MACRO TO DISABLE ALL SHORT CUTS

Posted by DAMIEN on July 11, 2001 12:26 AM

NEED THE CODE TO DISABLE THE USE OF ALL SHORT CUT COMMANDS

Posted by Dax on July 11, 2001 4:33 AM

Have a look at the Onkey method in the VB help. This code will disable all Ctrl and letter combinations. You could enhance the code to include function keys, numbers or whatever.

Sub DisableShortCutKeys()
'Disable Ctrl-a to Ctrl-z
Dim x As Integer
For x = 97 To 122
Application.OnKey "^" & Chr(x), ""
Next x
End Sub

Sub EnableShortCutKeys()
Dim x As Integer
For x = 97 To 122
Application.OnKey "^" & Chr(x)
Next x
End Sub

Regards,
Dax.