Normally, this stuff is managed through the new Ribbon. I think you can still manipulate the Menu Bar. Have not tried it though.
I believe that would be accomplished through the Command Bar Collection. It looks like you have a custom "Menu Bar" so it should just be a matter of customizing it some more.
http://msdn.microsoft.com/en-us/libr...ffice.10).aspx
You would want to add buttons/controls to the custom command bar
http://msdn.microsoft.com/en-us/libr...ffice.10).aspx
Here is an example of adding controls to an existing Menu Bar. May have to tweak it for VBA 2007
http://msdn.microsoft.com/en-us/libr...ffice.12).aspx
Code:
This following example adds a temporary pop-up control named "Custom" at the end of the active menu bar, and then it adds a button control named "Import" to the Custom pop-up command bar.
Set myMenuBar = CommandBars.ActiveMenuBar
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, _
Temporary:=True)
newMenu.Caption = "Custom"
Set ctrl1 = newMenu.Controls _
.Add(Type:=msoControlButton, Id:=1)
ctrl1.Caption = "Import"
ctrl1.TooltipText = "Import"
ctrl1.Style = msoButtonCaption |