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,
newMenu.Caption = "Vi&sion Menu"
End sub

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

Thanks a lot!


Leith Ross

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.

Leith Ross

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question