Can't disable RIGHT CLICK
 

I'm trying to disable right-clicking of all sheets except in the sheet
named "Home". I've put the following code, as recommended by VBE help,
in the "ThisWorkbook" object module:

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal
Target As Range, ByVal Cancel As Boolean)
If Sh.name < "Home" Then Cancel = True
End Sub

But I keep getting the following error when I open the workbook:

"Compile error: Procedure declaration does not match description of
event or procedure having the same name"

It's driving me nuts as I don't have another procedure with the same
name ! Any help would be greatly appreciated.

Can't disable RIGHT CLICK
 

It should be ByRef Cancel or simply Cancel, not ByVal. Always best to select
event stubs from the dropdown.

Regards,
Peter T

"AP" wrote in message
...
I'm trying to disable right-clicking of all sheets except in the sheet
named "Home". I've put the following code, as recommended by VBE help,
in the "ThisWorkbook" object module:

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal
Target As Range, ByVal Cancel As Boolean)
If Sh.name < "Home" Then Cancel = True
End Sub

But I keep getting the following error when I open the workbook:

"Compile error: Procedure declaration does not match description of
event or procedure having the same name"

It's driving me nuts as I don't have another procedure with the same
name ! Any help would be greatly appreciated.