Window item 2

[DODO1]

Hi,

I am creating customized menu's in excel97. Is it possible to insert the original excel "window" menu in the customized menubar, so I can see which workbooks are open.

thanks

 

[TonyJollans]

Hi DODO1,

Try ...

Application.commandbars("

Your Menu Name

").Controls.Add msoControlPopup,30009

Enjoy,
Tony

 

[DODO1]

Thanks Tony, I am now getting the menu "Window" which is what I want but it is empty. I would like to have all the items of the "Window" menu specially the part where the open spreadsheets are shown exp: book1; book2 etc.

thanks

 

[TonyJollans]

Hi DODO1,

You're absolutely right. Try copying the one off the menu bar - it should then come complete.

Application.Commandbars("Worksheet Menu Bar").Controls("Window").Copy _
Bar:=Application.Commandbars("Your Menu Name")

Enjoy,
Tony

 

[DODO1]

Thank You Tony that was the missing piece! You get a star from me.

DODO1

 

[ChrisBurch]

A star from me, because I found the post helpful.

Chris

It worked yesterday.
It doesn't work today.
That's Windows!