Hallo alle :)
Folgenden Code habe ich:
Dim cbb As CommandBarPopup
Dim scbb As CommandBarButton

Set cbb = Application.VBE.CommandBars("Menüleiste").Controls.Add(Type:=msoControlPopup)

cbb.Caption = "TestMich"
Set scbb = cbb.Controls.Add
scbb.BeginGroup = False
scbb.Style = msoButtonCaption
scbb.Caption = "TestMich Start"
scbb.OnAction = "MyShortcut"

Läuft auch einwandfrei durch, das Menü wird angelegt. Wenn ich dann aber den Eintrag "TestMich Start" aufrufe, wird das Makro MyShortcut NICHT aufgerufen... Warum?
Gruß
Norman