Eine Auflistung von CommandBarControl-Objekten, die die Befehlsleisten-Steuerelemente auf einer Befehlsleiste darstellen.
Verwenden der CommandBarControls-Auflistung
Verwenden Sie die Controls-Eigenschaft, um die CommandBarControls-Auflistung zurückzugeben. Im folgenden Beispiel wird der Titel jedes Steuerelements auf der Symbolleiste "Standard" auf den aktuellen Wert der Id-Eigenschaft für das jeweilige Steuerelement geändert.
For Each ctl In CommandBars("Standard").Controls ctl.Caption = CStr(ctl.Id) Next ctl
Verwenden Sie die Add-Methode, um der CommandBarControls-Auflistung ein neues Befehlsleisten-Steuerelement hinzuzufügen. In diesem Beispiel wird der Befehlsleiste "Custom" eine neue, leere Schaltfläche hinzugefügt.
Set myBlankBtn = CommandBars("Custom").Controls.Add
Verwenden Sie Controls(index), wobei index der Titel oder die Indexnummer eines Steuerelements ist, um ein CommandBarControl-, CommandBarButton-, CommandBarComboBox- oder CommandBarPopup-Objekt zurückzugeben. Der folgende Beispielcode kopiert das erste Steuerelement aus der Befehlsleiste "Standard" in die Befehlsleiste "Custom".
Set myCustomBar = CommandBars("Custom") Set myControl = CommandBars("Standard").Controls(1) myControl.Copy Bar:=myCustomBar, Before:=1