fick
Example code from
http://support.microsoft.com/default...EN-US;Q166755&
The .OnAction step runs the macro assigned to that item.
Sub menuItem_Create()
With CommandBars("Worksheet menu bar").Controls("Tools")
.Controls.Add(Type:=msoControlButton, Befo=1).Caption = _
"Custom1"
.Controls("Custom1").OnAction = "Code_Custom1"
End With
End Sub
NOTE: This is the code that runs when you click Custom1.
Sub Code_Custom1()
MsgBox "you clicked Custom1"
End Sub
You may also take a look at John Walkenbach's MENUMAKR.xls for creating menus.
http://j-walk.com/ss/excel/tips/tip53.htm
Gord
On 13 Dec 2004 07:46:09 -0800, "fick" wrote:
Thanks Gord
I know the best way to fix this problem is by creating custom toolbars
in VBA but how do you link the Macros?????
Thanks fick