Menübaum per VBA einfügen
13.11.2006 11:46:54
Anton
ich hatte mir im laufe der letzten 6 Monate einen schönen Menübaum für meine Makros in die Menüleiste eingebaut.
(Extras, Anpassen, neues Menü.... und Extras, Anpassen, Makros.... mit geänderten Köpfen und vielsagenden Namen)
Heute ist das passiert was ich einen K-Fall nenne: Excel stürzt ab und bringt dannach nur noch die Standart-Leisten.
erst hatte ich versucht meine persönliche Leiste zu sichern.... vergeblich.
Jetzt möchte ich es umgekehrt machen:
Ein Makro erstellt mir meine Leiste neu....
Ich habe es mal mit aufzeichnen versucht....
Sub Makro1()
' Makro1 Makro
' Makro am 13.11.2006 von Admin aufgezeichnet
Application.WindowState = xlMinimized
Windows("Makro wieder einrichten.xls").Activate
Application.CommandBars("Untermenü 1").Controls.Add Type:=msoControlButton, _
ID:=2950, Before:=3
Application.CommandBars("Untermenü 1").Controls.Add Type:=msoControlPopup, _
Before:=4
Application.CommandBars("Untermenü 2").Controls.Add Type:=msoControlButton, _
ID:=2950, Before:=1
End Sub
Wer kann mir bitte helfen das ich mir mein Makro-Menübaum selbst erstellen kann?
Es dankt und grüßt
Euer Anton