CommandBars.ActiveMenuBar-Eigenschaft (Office)

Ruft ein CommandBar -Objekt, das die aktiven Menüleiste in der containeranwendung darstellt. Schreibgeschützt.

Hinweis

[!HINWEIS] "CommandBar"-Objekte wurden in einigen Microsoft Office-Anwendungen durch die neue Menüband-Komponente der Microsoft Office Fluent-Benutzeroberfläche abgelöst. Weitere Informationen finden Sie unter Übersicht über das Office Fluent-Menüband.

Syntax

Ausdruck verwendet werden. ActiveMenuBar

Ausdruck Eine Variable, die ein CommandBars-Objekt darstellt.

Beispiel

Dieses Beispiel fügt ein temporäres Popupsteuerelement mit dem Namen "Benutzerdefiniert " am Ende der aktiven Menüleiste und ein Steuerelement mit dem Namen "Import " zum Popupsteuerelement hinzu.

Set myMenuBar = CommandBars.ActiveMenuBar 
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, Temporary:=True) 
newMenu.Caption = "Custom" 
Set ctrl1 = newMenu.CommandBar.Controls _ 
    .Add(Type:=msoControlButton, Id:=1) 
With ctrl1 
    .Caption = "Import" 
    .TooltipText = "Import" 
    .Style = msoButtonCaption 
End With

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.