Excel VBA - Custom Menu Bar

[bforster1]

I have created a custom menu bar..a section of the code below...but d
not know how to create a 2nd level to look like the example below.

Period >
Month >
Current Year (action)

Any suggestions. Thanks.

' Add a new menu
Set NewMenu = NewMenuBar.Controls.Add _
(Type:=msoControlPopup)
NewMenu.Caption = "&Period"
' Add a new menu item
Set NewItem = NewMenu.Controls.Add(Type:=msoControlButton)
With NewItem
.Caption = "&By Month"
.OnAction = "Main"
End Wit

 

[Jason Morin]

You should find your answer here (look under submenus):

How to customize menus and menu bars in Excel:
http://support.microsoft.com/default.aspx?scid=830502

HTH
Jason
Atlanta, GA