Ändern Sie den Status eines benutzerdefinierten CommandBar Schaltfläche mit VBA in Microsoft Excel
Das folgende Makro zeigt, wie Sie den Status einer benutzerdefinierten CommandBar-Schaltfläche so ändern können, dass sie als gedrückt oder nicht angezeigt wird.
Sub ToggleButtonState()
Dim m As CommandBarControl
Set m = CommandBars("CommandBarName").Controls(1)
If m.State = msoButtonDown Then
m.State = msoButtonUp
Else
m.State = msoButtonDown
End If
Set m = Nothing
End Sub