Restrict copy paste ability

[Guest]

I have a protect sheet with only few cells where users can enter data.

Is there anyway to restrict users not to do a copy paste in those areas?

Any help greatly appreciated.

Thanks

 

[Ron de Bruin]

Hi

With code you can use this event in the Thisworkbook module

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub

You must also disable drag and drop

 

[Guest]

Here is some selection change code that you need to put into the specified
sheet...
(Right click the sheet tab and select Veiw Code)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
with Application
If .CutCopyMode = xlCopy Then .CutCopyMode = False
If .CutCopyMode = xlCut Then .CutCopyMode = False 'Prevents Cut
end with
End Sub

 

[Guest]

Owesome....Thanks to Ron and Jim