vba - 右クリック アクションに OnAction() ハンドラを実装することは可能ですか?

Question

右クリック アクションに OnAction() ハンドラを実装することは可能ですか? これは、プログラムで作成された DropDown オブジェクト用です。

Answer 1

WindowBeforeRightClickを見ることができます

Public WithEvents appWord as Word.Application 

Private Sub appWord_WindowBeforeRightClick _ 
 (ByVal Sel As Selection, Cancel As Boolean) 
 Dim intResponse As Integer 

 intResponse = MsgBox("Selection = " & Sel & vbLf & vbLf _ 
 & "Continue with operation on this selection?", _ 
 vbYesNo) 
 If intResponse = vbNo Then Cancel = True 
End Sub

または、右クリック メニューのカスタマイズ

私も試していません。