Excel 2010禁用右键菜单

Question

下午好，

我正在尝试限制右键菜单显示在Excel工作表中。我试图使用代码：

Private Sub Workbook_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    MsgBox "Sorry!  Right click is disabled!"
    Cancel = True
End Sub

我错过了一些可以让它发挥作用的东西吗？

谢谢，

本

Answer 1

您可以使用以下代码：

MsgBox "Sorry!  Right click is disabled!"
Cancel = True

但是要指定工作表，您需要打开该工作表的代码模块并将其放在Worksheet_BeforeRightClick事件块中，以便最终结果如下所示：

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    MsgBox "Sorry!  Right click is disabled!"
    Cancel = True
End Sub

编辑： 请注意，特定工作表模块中的事件是＆＃34; Worksheet_BeforeRightClick＆＃34;事件，但工作簿模块有＆＃34; Workbook_SheetBeforeRightClick＆＃34;。如果您需要每张纸，则需要将工作表事件添加到每个所需的工作表。如果您希望将其用于整个工作簿，则需要将工作簿事件放在工作簿模块中。

对于工作簿模块，它应该如下所示（＆＃34; ThisWorkbook＆＃34;＆＃34; Book1＆＃34;项目是左窗格中的选定模块）：

对于工作表模块，它应该如下所示（＆＃34; Sheet1（Sheet1）＆＃34;＆＃34; Book1＆＃34;项目是左窗格中的选定模块）;

语法差异很关键。