VBA代码禁用Excel中的右键单击选项仅用于当前工作簿

我在工作簿中创build了多个工作表。
我想我的用户不允许在Excel中看到其他表。
因为我想在Excel打开事件中禁用右键单击选项。

我有一段代码：

Private Sub Workbook_SheetBeforeRightClick (ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean) Cancel = True MsgBox ("Sorry Right Click is Disabled for this Workbook") End Sub 

上面的代码只有在打开工作簿并运行macros后才能运行。
我想在打开工作簿时禁用右键单击选项。

Answer 1

试试这个，不同的参数…

 Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) Cancel = True End Sub 

Answer 2

你可以尝试下面的代码： – 祝你好运

 Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.CommandBars("Ply").Enabled = True End Sub 

和

 Private Sub Workbook_Open() Application.CommandBars("Ply").Enabled = False End Sub