Hide Toolbars

[LoopCost]

How would I go about hiding the default toolbars?? I am going to create custom toolbars but I do not want to give the user the option to use the defaults.

TIA

RR

 

[wob]

i'm pretty sure you can only do this if all users share the same personal.xls file (on a network).

i could be wrong....

is this ok?

 

[LoopCost]

Having the same personal.xls is NOT an option. Does anyone have any other ideas???

 

[wob]

getting a bit more background...

a user can always change their toolbar settings. you can't make any changes permanent without resorting to forcing them behind a macro.

as far as i know anyway.

i suppose that you could reset the toolbars for each user's pc to start them off, but i don't think you can keep those settings permanent.

 

[Barry Katcher]

How many custom icons are you going to give them? One possibility is, instead of tool in a toolbar, create macros and assign them to buttons. Then, use View/Full Screen to hide the default tool bars. Of course, there's no way to prevent the user from going and turning off Full Screen. Never mind.

 

[LoopCost]

More backgroud:

This would only be nessisary when a specific *.xls file is opened and that file would have to contain the VBA code to hide the toolbars. I would really like to avoid the full screen option as it would remove my custom toolbar.

Keep the ideas comming! You all are great.

RR

 

[Mav]

this macro will hide the default toolbar:

Sub notools()
'
' notools Macro
'
'
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Visual Basic").Visible = False
End Sub

 

[Mav]

probably just the first line in the macro above is the one needed if you "unselect" all others at default....anyways, this is what I use to restore the tool bars after hiding them:

Sub toolson()
'
' notools Macro
' Macro recorded 5/7/2002 by Randy
'
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Visual Basic").Visible = True
End Sub