如何在辦公室加載項中獲取與上下文菜單關聯的對象

我有一個用於辦公室的簡單COM加載項（專門用於訪問）。如何在辦公室加載項中獲取與上下文菜單關聯的對象

我在右鍵單擊導航窗格中的對象時彈出的上下文菜單中添加了一個自定義commandbarbutton項目。

這工作正常。我添加的調試代碼運行（目前只是一個msgbox命令）。我無法弄清楚如何做的一件事是獲取綁定到上下文菜單的對象的對象。

我希望發生這種情況;我右鍵單擊導航窗格中的模塊，選擇我的新菜單選項，然後出現一個消息框，其中顯示當前突出顯示的模塊的名稱。我會怎麼做呢？

這是我目前如何處理事件：

Public Sub myEventHandler(ByVal ctrl As CommandBarButton, ByRef CancelDefault As Boolean) Handles contextMenu_navPaneObject.Click, contextMenu_navPaneList.Click 

    MsgBox(Microsoft.VisualBasic.Information.TypeName(ctrl) & vbCrLf & _ 
      Microsoft.VisualBasic.Information.TypeName(ctrl.Parent) & vbCrLf & _ 
      Microsoft.VisualBasic.Information.TypeName(ctrl.Parent.Parent)) 

End Sub

contextMenu_navPaneObject和contextMenu_navPaneList是私有對象使用「WITHEVENTS」和具有的CommandBarButton的對象類型聲明。

這是正確的方式來做我想做的，或者是否有另一種方法我應該使用？

來源

2010-10-13 rageingnonsense

原來做什麼，我想，我需要運行下面的方法：

Access.Application.CurrentObjectName（）

這回我目前已經突出顯示的項目名稱。

我希望這可以幫助別人！

來源

2010-10-13 21:52:36 rageingnonsense

如何在辦公室加載項中獲取與上下文菜單關聯的對象

回答

相關問題