I have a custom menu on the menu bar. There are 2 menus. I want to
add a sub menu as follows:

Test Analyses
Explore Test
Type 1 -- call sub1
Type 2 -- call sub2
Plan Test -- call sub3


Here is the code so far:
Set newmen = MenuBars(xlWorksheet).Menus.Add("Test &Analyses")
newmen.MenuItems.Add "E&xplore Test", "getEXPLOREdata"
newmen.MenuItems.Add "&Plan Test", "getPLANdata"


Thanks