Disable ctrl c and ctrl v

[kaywin]

Please help me how to disable Ctrl+c ,ctrl+v and ctrl+x in the excel...

Thanks
Kaywin

 

[mikerickson]

Why do you want to do that?
There are so many way to copy/paste (ctrl+c, menu, buttons, drag/drop, ...) that disabeling all of them it usually not a good way to approach the problem.

 

[VoG]

Try

Sub DisableCutCopyPaste()
'Disable CTRL + C etc.
Application.OnKey "^{c}", "" 'Copy
Application.OnKey "^{v}", "" 'Paste
Application.OnKey "^{x}", "" 'Cut
End Sub

 

[kaywin]

Hi mikerickson,
We have added some data validation for many fields in the each sheet..If the user copy paste the content .. those validations are not working ... Thats y i planned to restrict copy paste.. Is there any other way to over come this problem?

Thanks
Kaywin

 

[mikerickson]

You could alter the validation routine to handle multi-cell pastes. If you have an existing validation routine in the Change event that handles one cell you could put it into a structure like

If Not Application.Intersect(Target, KeyRange) is Nothing Then
    For Each OneCell in Application.Intersect(Target, KeyRange).Cells
        Rem routine for oneCell
    Next oneCell
End If

 

[mikerickson]

Perhaps, in the sheet's code module.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If 0 < Application.CutCopyMode Then
        Target.Copy
    End If
End Sub

 

[friendlydue2000]

How should i alter the validation routine to handle multi cell pastes. Kindly explain. It would be a great help for me too

 

[mikerickson]

One way of altering it would be to take your existing (Change event based) validation routine and put it inside that loop structure.

 

[friendlydue2000]

Which loop structure are you talking about???

 

[xenou]

The loop structure is exhibited in post #6 using a change event to run the validation.

If users are copying data it's probably easier that way - try to work with the current rather than push against it.