Workbook SheetBeforeRigh

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
   jeet = MsgBox("Do you really want to Right Click the workbook?", vbYesNo)
   If jeet = vbNo Then Cancel = True
End Sub