CommandBarControl.Move-Methode (Office)

Verschiebt das angegebene CommandBarControl-Objekt auf eine vorhandene Befehlsleiste.

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. Verschieben (Balken, Vorher)

Ausdruck: Erforderlich. Eine Variable, die ein CommandBarControl -Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Bar Optional Variant Ein Command -Objekt, das die Ziel-Befehlsleiste für das Steuerelement darstellt. Wenn dieses Argument ausgelassen wird, ist das Steuerelement an das Ende der Befehlsleiste verschoben, in dem sich das Steuerelement derzeit befindet.
Before Optional Variant Eine Zahl, die die Position für das Steuerelement angibt. Das Steuerelement wird vor dem Steuerelement eingefügt, das sich momentan an dieser Position befindet. Wird dieses Argument weggelassen, wird das Steuerelement am Ende derselben Befehlsleiste eingefügt.

Beispiel

In diesem Beispiel wird das erste Kombinationsfeld-Steuerelement auf der Befehlsleiste mit dem Namen Benutzerdefiniert an die Position vor dem siebten Steuerelement auf dieser Befehlsleiste verschoben. Im Beispiel wird das Tag auf das Auswahlfeld festgelegt und dem Steuerelement eine niedrige Priorität zugewiesen, sodass es wahrscheinlich aus der Befehlsleiste gelöscht wird, wenn nicht alle Steuerelemente in eine Zeile passen.

Set allcontrols = CommandBars("Custom").Controls 
For Each ctrl In allControls 
    If ctrl.Type = msoControlComboBox Then 
        With ctrl 
            .Move Before:=7 
             .Tag = "Selection box" 
             .Priority = 5 
         End With 
         Exit For 
    End If 
Next

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.