Software

Ask something
Discussion Locked

Prevent Copy/Paste Ability in Excel

0 helpful
3 replies

by maddogdr

Closed to new repliesThis discussion is closed. It stays readable, but it takes no new replies.

Is there a way to eliminate the ability to copy and paste in an Excel Worksheet?
I am working with newely created medical eval type worksheets (office 2003), and need to force Therapists to manually type in new eval data pertaining to current clients, rather than copy similar entries from other, older sheets hidden in their archives, and pasting them onto the new sheets. This practice is against medicare regs and needs to be blocked somehow.
Thank you for any help that can be afforded.

3 replies

by chitosunday

put this in your thisworkbook module

Private Sub Workbook_Open()
On Error Resume Next
Application.CommandBars("Edit").Controls("©").Enabled = False
Application.CommandBars("cell").Controls("©").Enabled = False
Application.OnKey "^c", "disablec"
End Sub

Sub disablec()
MsgBox "Copy command disabled"
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.CommandBars("Edit").Controls("©").Enabled = True
Application.CommandBars("cell").Controls("©").Enabled = True
Application.OnKey "^c", ""
End Sub

'then put this in a module

Sub disablec()
MsgBox "Copy command disabled"
End Sub

by maddogdr

Poster rated this answer.
Your Script worked perfectly! Thank You so much! You don't know how much you have helped me, and I truely want to thank you from the bottom of my heart.
I would have to rate this at 110%
I love this site and it's members. They are the greatest!

This discussion is closed to new replies.