Excel Menu Bar
 

Dear all,

I am using Excel 2002 and have the below code to create a menu named
'Vsion Menu' it works. However when I use this file in Excel 2000 this
menu does not work or pop up to the Excel menu

Sub MakeMenu()
Dim myMenu, newMenu, Button1, Button2, Button3, Button4, Button5
Set myMenuBar = CommandBars("Worksheet menu Bar")
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup,
temporary:=True)
newMenu.Caption = "Vi&sion Menu"
End sub

Could anyone can help me why it does't work.

Thanks a lot!

Nam


--
lehainam
------------------------------------------------------------------------
lehainam's Profile: http://www.excelforum.com/member.php...o&userid=18615
View this thread: http://www.excelforum.com/showthread...hreadid=552103

Excel Menu Bar
 

Hello lehainam,

I'm running Windows Xp Home Edition with Excel 2000 and the code works
fine. Try running your code on someone elses computer.

Sincerely,
Leith Ross


--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...o&userid=18465
View this thread: http://www.excelforum.com/showthread...hreadid=552103