M
mike
There are in fact two ways.
One programmatically: attach to an event (..OPEN) the
following code:
Dim ctrl As CommandBarControl
..........
Set mnu = Application.CommandBars("CELL")
Set ctrl = mnu.Controls.Add( _
Type:=msoControlButton, _
ID:=1, _
Temporary:=True)
ctrl.Caption = "...your label..."
ctrl.OnAction = "...your action..."
(could be the name of a sub: mySub)
(could be the name of an AddIn: !<myAdd>)
(could be an Excel action defined in
another commandBar)
the other one is by customizing your menus
Hope it'll help you.
from the standard toolbar Insert/Name.
One programmatically: attach to an event (..OPEN) the
following code:
Dim ctrl As CommandBarControl
..........
Set mnu = Application.CommandBars("CELL")
Set ctrl = mnu.Controls.Add( _
Type:=msoControlButton, _
ID:=1, _
Temporary:=True)
ctrl.Caption = "...your label..."
ctrl.OnAction = "...your action..."
(could be the name of a sub: mySub)
(could be the name of an AddIn: !<myAdd>)
(could be an Excel action defined in
another commandBar)
the other one is by customizing your menus
Hope it'll help you.
of available commands, I want to add the command available-----Original Message-----
Is there a way to add a new entry to a right mouse click dropdown list?
When I right mouse click on a cell in the drop down list
from the standard toolbar Insert/Name.