Freigeben über


CommandBarControl-Objekt (Office)

Stellt ein Befehlsleisten-Steuerelement dar. Das CommandBarControl -Objekt ist Mitglied der CommandBarControls -Auflistung an. Eigenschaften und Methoden des CommandBarControl -Objekts werden von den CommandBarButton, CommandBarComboBox und CommandBarPopup -Objekten verwendet.

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.

HinwBemerkungeneise

Wenn Sie VBA-Code zum Arbeiten mit benutzerdefinierten Befehlsleisten-Steuerelemente schreiben möchten, verwenden Sie die Objekte CommandBarButton, CommandBarComboBox und CommandBarPopup.

Wenn Sie schreiben Code integrierte Steuerelemente in der containeranwendung entwickelt, die von einer dieser drei Objekte dargestellt werden kann, verwenden Sie das CommandBarControl -Objekt. Verwenden Sie Controls (Index), wobei index die Indexnummer eines Steuerelements ist, um ein CommandBarControl-Objekt zurückzugeben. (Die Type-Eigenschaft des Steuerelements muss msoControlLabel, msoControlExpandingGrid, msoControlSplitExpandingGrid, msoControlGrid oder msoControlGauge sein.

Als CommandBarControl deklarierte Variablen können CommandBarButton, CommandBarComboBox und CommandBarPopup -Werte zugewiesen werden.

Beispiel

Sie können die FindControl -Methode auch verwenden, um ein CommandBarControl -Objekt zurückzugeben. Das folgende Beispiel sucht nach einem Steuerelement des Typs MsoControlGauge; Wenn es gefunden wird, wird die Indexnummer des Steuerelements und der Name der Befehlsleiste, die er enthält. In diesem Beispiel stellt die Variable lbl ein CommandBarControl-Objekt dar.

Set lbl = CommandBars.FindControl(Type:= msoControlGauge) 
If lbl Is Nothing Then 
    MsgBox "A control of type msoControlGauge was not found." 
Else 
    MsgBox "Control " & lbl.Index & " on command bar " _ 
        & lbl.Parent.Name & " is type msoControlGauge" 
End If

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.