Worksheet.BeforeRightClick 事件 (Excel)
在預設的按滑鼠右鍵動作之前,以滑鼠右鍵按一下工作表時,即發生此事件。
語法
運算式。BeforeRightClick (目標 、 取消)
表達 代表 Worksheet 物件的 變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
Target | 必要 | Range | 以滑鼠右鍵按一下時,最靠近滑鼠指標的儲存格。 |
Cancel | 必要 | 布林值 | False 事件發生時。 如果事件程序將這個引數設定為 True,則當程序完成後不會發生預設的按滑鼠右鍵動作。 |
註解
與其他工作表事件相似,當指標位置在圖案或命令列 (工具列或者功能表列) 上時,按一下右鍵並不會引發本事件。
範例
這個範例會在 B1:B10 儲存格中新增快顯功能表項目。
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
Cancel As Boolean)
Dim icbc As Object
For Each icbc In Application.CommandBars("cell").Controls
If icbc.Tag = "brccm" Then icbc.Delete
Next icbc
If Not Application.Intersect(Target, Range("b1:b10")) _
Is Nothing Then
With Application.CommandBars("cell").Controls _
.Add(Type:=msoControlButton, before:=6, _
temporary:=True)
.Caption = "New Context Menu Item"
.OnAction = "MyMacro"
.Tag = "brccm"
End With
End If
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。