ich möchte einen zusätzlichen Eintrag im Kontextmenü durch farliches Unterlegen besonders hervorheben. Ist so etwas möglich?
...
Set cbb = CommandBars("cell").Controls.Add(1)
cbb.Caption = "Starten"
cbb.OnAction = "Begin"
...
Gruß Steffen
Dim cbb As CommandBarControl
On Error Resume Next
CommandBars("cell").Controls("Starten").Delete
On Error GoTo 0
Set cbb = CommandBars("cell").Controls.Add(1, Temporary:=True)
cbb.Caption = "Starten"
cbb.OnAction = "Begin"
cbb.BeginGroup = True
cbb.FaceId = 15
Gruß Tino