View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Simon Lloyd[_839_] Simon Lloyd[_839_] is offline
external usenet poster
 
Posts: 1
Default Preventing Right Click On Sheet Tab???


Hi all i have this code below that stops the user using right click on
cell how do i modify it so that they can not use right click on a shee
tab?

Regards,
Simon

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVa
Target As Range, Cancel As Boolean)
ActiveWindow.DisplayHeadings = False
Cancel = True
ShortcutMenus(xlWorksheetCell).Enabled = False
MsgBox "You Can Only Use Your Left Mouse Button To Make Your Choice!"
vbExclamation, "Mouse Warning"
End Su

--
Simon Lloy
-----------------------------------------------------------------------
Simon Lloyd's Profile: http://www.excelforum.com/member.php...nfo&userid=670
View this thread: http://www.excelforum.com/showthread.php?threadid=56505