Erstellen einer benutzerdefinierten Symbolleiste in Excel

Erstellen einer benutzerdefinierten Symbolleiste in Excel

Moin Moin,

habe folgendes Problem:

Ich möchte in Excel eine benutzerdefinierte Symbolleiste mit 10-12 Befehlsschaltflächen erstellen, die beim anklicken jeweils ein Makro starten.

Ein Button funktioniert auch:


Sub Schalter ()

Set MyBar = CommandBars _
.Add(Name:="Bericht", Position:=msoBarTop, _ Temporary:=True)
MyBar.Visible = True

Set oldControl = MyBar.Controls.Add
oldControl.OnAction = "Sprung"

With oldControl
.Caption = ">>Übersicht<<"
. Style = msoButtonIconAndCaption

End With

ActiveWindows.DisplayWorkbookTabs = False

End Sub


Wie füge ich denn nun weitere Buttons ein? Meine Versuche endeten alle erfolgslos.

Vielleicht kann mir hier ja jemand helfen

MfG

B.Böcherer