[VBA]
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "No Right-Clicking!", vbOKOnly + vbInformation, "My Excel Events"
Cancel = True
End Sub
[/VBA]you can put the two lines (msgbox optional) at the end of the code in the module!