This will toggle the enabled status of the right-click
menu:

Sub TogRightClick()
With Application.CommandBars("Cell")
..Enabled = Not .Enabled
End With
End Sub

Regards,
Greg

-----Original Message-----
Can anyone tell me the code to disable the right click
menu on a worksheet?
.