Hallo!
Ich lass mir in einer Userform ein Kontextmenü aufklappen. Wie ist denn der Befehl, der mir anzeigt welchen Eintrag (Caption) ich im Kontextmenü gewählt habe. Ich benötige diese Info zusätzlich zur OnAction Anweisung.
Vielen Dank im voraus,
Torsten
Hi,
wird die Prozedur von mehr als einem controls aufgerufen?
mfg Leo
AW: Kontextmenü: Welcher Eintrag wurde geklickt
18.10.2005 16:12:29
Torsten
Hallo Leo,
anbei mal ein Ausschnitt aus dem Code. Vielen Dank schon mal für deine Info!
Torsten Dim cmbX As CommandBar Dim pop1 As CommandBarPopup Dim pop2 As CommandBarPopup Dim objBtn As CommandBarButton
On Error Resume Next
Application.CommandBars("XM").Delete
'Das Menü Ansicht (Rechteck) Set cmbX = CommandBars.Add(Name:="XM", Position:=msoBarPopup, Temporary:=True)
With cmbX.Controls
Set objBtn = .Add
With objBtn .Caption = "Excel Export" '.OnAction = "" .Style = msoButtonIconAndCaption .FaceId = 66 .BeginGroup = True End With
Set objBtn = .Add
With objBtn .Caption = "2. Eintrag" '.OnAction = "" .Style = msoButtonIconAndCaption .FaceId = 25 End With
End With
cmbX.ShowPopup
Anzeige
AW: Kontextmenü: Welcher Eintrag wurde geklickt
18.10.2005 16:17:31
Leo
Hi,
nett, nützt aber nicht, da keine Prozeduren aufgerufen werden. Sie dir ActionControl an, wobei ich aufgrund deines Codes nicht sehen kann, ob das überhaupt nötig ist.
mfg Leo