Farbe von eigenen Symboleisten-Buttons ändern
eigenen
Hab eine Frage: Ich hab mir ne Symbolleiste erstellt mit mehreren Buttons drauf, wie zum Beispiel der folgende Button mit der Aufschrift "Anschrift":
Dim objBtn As CommandBarButton
'Begin insert Anschrift
On Error Resume Next
Application.CommandBars("autotxt").Controls("Anschrift").Delete
Err.Clear
Set objBtn = Application.CommandBars("autotxt").Controls.Add(Type:=msoControlButton, Before:=1, Temporary:=True)
If Err 0 Then
Err.Clear
Set objBtn = Application.CommandBars("autotxt").Controls.Add(Type:=msoControlButton, Before:=0, Temporary:=True)
End If
On Error GoTo 0
With objBtn
.Caption = "Anschrift"
.OnAction = "Anschrift"
.BeginGroup = False
.Style = msoButtonCaption
End With
'End insert Anschrift
Wie kann ich jetzt zum Beispiel die Hintergrundfarbe dieses Buttons ändern oder vielleicht auch die Schriftfarbe der Aufschrift?
P.s: Ich will aber auch keine Bilder drauf haben!
Viele Grüße!
Henrik