in der "Worksheet Menu Bar" sollte ich unter "Format" einen neuen Befehl "Diagramfarben" einbauen, der immer sichtbar ist, egal ob ein Tabellen- oder Diagrammblatt angewählt und egal ob eine Zelle oder Diagramm angewählt ist.
Mit
Set cmdctrl = Application.CommandBars("Worksheet Menu Bar").FindControl(ID:=30006)
Set newcmd = Application.CommandBars("Worksheet Menu Bar").Controls(cmdctrl.Index)
Set cmd_add = newcmd.Controls.Add(Type:=msoControlPopup, Temporary:=False)
With cmd_add
.Caption = "Set Colors"
.OnAction = "set_them_colors"
End With
kann ich zwar einen Befehl ins Menü "Format" stellen, aber der verschwindet sobald etwas anderes als eine Zelle angewählt ist.
Wie kann ich den Befehl da festnageln?
Gruss yogi