Replacing Word menu bar with custom menu bar

[Larry]

I just experimentally put together this code that replaces Word's menu
bar with a temporary menu.

Questions:

Why would anyone want to replace the menu bar with a custom menu bar?

If the Add method was not set for temporary, would it be possible to
restore the regular menu once it had been replaced, or would it be lost
from that template forever?

Set mybar = CommandBars _
.Add(Name:="Custom", Position:=msoBarBottom, MenuBar:=True,
Temporary:=True)
With mybar
.Visible = True
End With

Larry

 

[Jonathan West]

I just experimentally put together this code that replaces Word's menu
bar with a temporary menu.

Questions:

Why would anyone want to replace the menu bar with a custom menu bar?

They wouldn't - it appears that you cant!

If the Add method was not set for temporary, would it be possible to
restore the regular menu once it had been replaced, or would it be lost
from that template forever?

You can alsways change the menus by hand using the Tools Customize dialog,
which includes a button called Reset, which restires the selected standard
toolbar to its factory setting.

 

[Larry]

Why would anyone want to replace the menu bar with a custom menu
bar?

They wouldn't - it appears that you cant!

Jonathan, I don't understand what you said. I replaced the regular menu
bar with that macro. The regular menu bar went away and the custom menu
bar appeared in its place.

I'm not talking about customizing the menu bar, but about the VBA code
the creates a new menu bar.

Larry

 

[Word Heretic]

G'day "Larry" <[email protected]>,

normally we use it to add to the menu bar. You are just being that
"idiot user" who proves that "idiot-proof" aint so ;-)

I just experimentally put together this code that replaces Word's menu
bar with a temporary menu.

Questions:

Why would anyone want to replace the menu bar with a custom menu bar?

If the Add method was not set for temporary, would it be possible to
restore the regular menu once it had been replaced, or would it be lost
from that template forever?

Set mybar = CommandBars _
.Add(Name:="Custom", Position:=msoBarBottom, MenuBar:=True,
Temporary:=True)
With mybar
.Visible = True
End With

Larry

Steve Hudson

Word Heretic, Sydney, Australia
Tricky stuff with Word or words for you.
wordheretic.com

If my answers r 2 terse, ask again or hassle an MVP,
at least they get recognition for it then.
Lengthy replies offlist require payment.

 

[Larry]

WH,

If you're going to write a message calling someone an idiot, don't start
it by saying "G'day" to him. People might get the idea that "G'day" is
not the friendly greeting it appears to be.

Larry






You start by saying "G'day," and then you call me an idiot.

 

[Word Heretic]

G'day "Larry" <[email protected]>,

That's exactly why i started with G'day and quoted around "idiot
user". Nothing is idiot-proof is an axiom - sorry if you take offense
at a std dev's expression.

WH,

If you're going to write a message calling someone an idiot, don't start
it by saying "G'day" to him. People might get the idea that "G'day" is
not the friendly greeting it appears to be.

Larry






You start by saying "G'day," and then you call me an idiot.

Steve Hudson

Word Heretic, Sydney, Australia
Tricky stuff with Word or words for you.
wordheretic.com

If my answers r 2 terse, ask again or hassle an MVP,
at least they get recognition for it then.
Lengthy replies offlist require payment.