ich habe ein Makro geschrieben das u.a. ein Diagramm aktualisiert und darstellt, nun fehlen mir aber beim Diagramm in der Menüleiste meine Makros. Wenn ich zurück aufs Datenblatt gehe sind meine Menüs vorhanden, wo muss ich denn den Quelltext hinschreiben dass ich sie überall sehen und ausführen kann. Ich habe mal was gelesen von Chart Menu Bar, aber wie spreche ich den an ?
Danke schon mal ....
hausmann
So sieht der Text für das Menü aus.
---------------------------------------------------------------------------------------------------------------------------------
Private Sub Workbook_Open()
On Error Resume Next
Dim TESTBUTTON As CommandBarButton
i = Application.CommandBars(1).Controls.Count
i_Hilfe = Application.CommandBars(1).Controls(i).Index
Set MenüNeu = Application.CommandBars(1). _
Controls.Add(Type:=msoControlPopup, _
Before:=i_Hilfe, Temporary:=True)
MenüNeu.Caption = "TESTBUTTON"
Set TESTBUTTON = MenüNeu.Controls.Add(Type:=msoControlButton, Before:=1)
With TESTBUTTON
.Caption = "TESTBUTTON_TEST"
.OnAction = "start"
End With
End Sub
------------------------------------------------------------------------------------------------------------------------------------