Zoom-Funktion in eigener Menuleiste?
04.02.2003 08:46:18
Dani
ich habe ein Macro dass alle Excel-Leisten ausblendet und eine eigene Leiste erstellt, nach folgendem Code:
Dim ML As CommandBar
Set ML = Application.CommandBars.Add(Name:="Druck_Leiste", Position:=msoBarTop)
ML.Visible = True
Dim Menu As Object
Set Menu = ML.Controls.Add(Type:=msoControlButton, Id:=1)
Menu.Caption = "Diagramm Drucken"
Menu.TooltipText = "Diagramm drucken"
Menu.Style = msoButtonCaption
Menu.OnAction = "Diagramm_drucken"
Nun zu meiner Frage:
Gibt es eine Möglichkeit ganz simpel auf das "Zoom-Dropdown-Menu" zuzugreifen und dieses als "Button" in der Leiste anzuordnen???
Danke!!