Hallo liebe Leser,
ich habe mir eine Menüleiste gebastelt:
Sub erstellen()
Dim cb As CommandBar, cbc As CommandBarControl
Set cb = Application.CommandBars.ActiveMenuBar
Set cbc = cb.Controls.Add(Type:=msoControlPopup)
cbc.Caption = "Meine Menüleiste"
With cbc.Controls.Add
.Caption = "Auswahl Strg+a"
.OnAction = "Auswahl"
End With
With cbc.Controls.Add
.Caption = "Druckmenu Strg+d"
.OnAction = "Druckmenu"
End With
Gibt es eine Möglichkeit die Tastenkombination übersichtlich/bündig anzuzeigen. Mein Weg ist doch schon ein wenig umständlch.
Danke für eventl. Tipps im voraus.
Gruß
Karsten