Vba 在右键单击操作上实现OnAction（）处理程序是否可能？

在右键单击操作上实现OnAction（）处理程序是否可能？这适用于以编程方式创建的下拉对象

你可以看看

或

---

我也没有试过。

谢谢。我想我也不想尝试。实际上我是代表一个朋友问的。

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