Start Up Menu

[softpro]

Hi,

I had unchecked all the options in Tools --> Start up dialog.

In that screen I could not save Menu Bar to blank, when I come next time it displays (default).


I am still getting menu (With file, edit, insert, records, window, help) while opening the application.

How to remove this?

Thanks a lot for all your help.

 

[ghudson]

The startup options is not how you remove the menu bar.

This will allow you to hide and unhide all tool bars and menu bars. Ensure that you have a way to call the code to enable the tool bars and menu bars 'before' you disable them!

'Put this hide all toolbars and menu bars
Dim I As Integer
For I = 1 To CommandBars.Count
CommandBars(I).Enabled = False
Next I

'Put this unhide all toolbars and menu bars
Dim I As Integer
For I = 1 To CommandBars.Count
CommandBars(I).Enabled = True
Next I

An added bonus is the right click option is disabled if the menu bars are disabled with this code.

HTH

 

[dgm]

You can also use,

DoCmd.ShowToolbar "menu bar", acToolbarYes ' To show it and
DoCmd.ShowToolbar "menu bar", acToolbarNo ' To hide it

Dave

 

[rpadams]

How do I close a print preview on reports?

I used the hide/unhide viz.ghudson and it worked great. I hide on main form open and unhide by a command button that is visible only on correct password of supervisor. Works great. The problem is that I have a number of reports that open as print preview and can be printed (or just viewed). I used the "X" to close them and return to main, but the report "X" is not visible--I can only close the entire database (NOT good!) I created a custom report toolbar, but this gets hidden as any other toolbar.

Bottom line question: How do you close a print preview if the menu and tool bars are turned off?

 

[softpro]

Thanks all of you ! I followed your suggestions, it works!

 

[dgm]

rpadams,

When you open a report, show your custom toolbar,

docmd.showtoolbar "myPrintToolbar", acToolbarYes

and then hide it on the reports close event,

docmd.showtoolbar "myPrintToolbar, acToolbarNo

That should work.

Dave