本文由日文译成中文。

本文记录了在 Excel VBA 中右键单击工作表时的操作方法。

要在右键单击时进行操作，请使用 “BeforeRightClick ”事件。

< Sponsored Links >





句法 “BeforeRightClick”

WorksheetObject.BeforeRightClick(Target, Cancel)

右键单击工作表时，在默认右键单击操作之前出现。

目标： 必填。右键单击时，将通过最靠近鼠标指针的单元格。
取消： 必填。事件发生时将传递 False。如果在事件过程中将此参数设置为 True，则在过程退出时将不执行默认的右键单击操作。

　

右键单击时使用 VBA 的示例

在 VBE 中，在对象栏中标有“（常规）”的下拉菜单中选择 “Wordsheet”，在过程栏中选择 “BeforeRightClick”。

BeforeRightClick

　

“Private Sub Worksheet_SelectionChange…End Sub” 部分不需要，应删除。

BeforeRightClick

　

在工作表上单击右键时，如果单元格是 C5，就会看到一条信息，否则就会看到正常的快捷菜单。

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Address = "$C$5" Then
    Cancel = True
    MsgBox Target.Address & " Cell clicked."
  End If
End Sub
BeforeRightClick

　

右键单击单元格 C5 显示信息。

BeforeRightClick

　

右键单击 C5 以外的单元格时，通常会出现快捷菜单。

BeforeRightClick

< Sponsored Links >