Question

我在工作簿中创建了多个工作表我想我的用户不允许在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

上述代码仅在打开工作簿并运行宏后运行我想在打开工作簿时禁用工作簿的右键单击选项。

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

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

2 个答案: