Stellt ein Schaltflächen-Steuerelement auf einer Befehlsleiste dar.
Verwenden des CommandBarButton-Objekts
Verwenden Sie Controls(index), wobei index die Indexnummer des Steuerelements ist, um ein CommandBarButton-Objekt zurückzugeben. (Die Type-Eigenschaft des Steuerelements muss msoControlButton sein.)
Im folgenden Beispiel wird davon ausgegangen, dass das zweite Steuerelement auf der Befehlsleiste mit dem Namen "Custom" eine Schaltfläche ist. Der Stil dieser Schaltfläche wird geändert.
Set c = CommandBars("Custom").Controls(2) With c If .Type = msoControlButton Then If .Style = msoButtonIcon Then .Style = msoButtonIconAndCaption Else .Style = msoButtonIcon End If End If End With
Sie können auch die FindControl-Methode verwenden, um ein CommandBarButton-Objekt zurückzugeben.