Set Access to Always Show Full Menus

[BobV]

Group:

What is the VBA statement to force Access 2002 to always show Full menus,
rather than the default which is the most recently used menu items?

I know that I can manually set Access to use full menus by selecting
Tools>Customize>Options and then checking the Always Show Full Menus box.
But I am wondering if this can be set with VBA code so that when my
application runs under the Access 2002 Runtime on a customer's computer that
the full menus option will be selected automatically. Right now, when my
application is installed and run under the Access 2002 Runtime on a
customer's computer, my application does not default to use Full menus. I
want to force the Access 2002 Runtime to use Full menus.

Any help with the VBA code to force the use of Full menus will be greatly
appreciated.

Thanks,
BobV

 

[Roger Carlson]

I don't think it's possible to have full menus with the Access Run-time.
Since the Access Run-time is NOT a full Access install, most of the menu and
toolbar items are gone. When you develop an application to be used with the
Run-time, you better program all the functions you need yourself.

 

[Brendan Reynolds]

As Roger says, this option will not give you full built-in menus in a
runtime application, but I was curious to find whether there was a way to do
it programmatically with retail Access. A search of the KB didn't turn up
any way to do it, but it did reveal that this option is Office-wide. Change
it in Access, and it is also changed in Word, Excel, Outlook and PowerPoint.
I'd be inclined not to mess with it, but to respect the users preferences,
but if you still want to pursue it, if there is any way to do it at all it
will be found somewhere in the Office object library rather than in the
Access object library.

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.

 

[Albert D. Kallal]

Folks, I think he means adaptive menus.


I absolute HATE them for my applications, and thus turn them off. That
simply means when you select a menu item like file, edit etc, then ALL
options show, and you don't get that extra annoying thing to "expand" the
menu options.

And, yes..the runtime also has adaptive menus..and again..I dislike them
very much.

So, here is the startup code I run for the run time

On Error Resume Next

Application.SetOption "ShowWindowsInTaskbar", False
Application.SetOption "Themed Form Controls", True
Application.SetOption "Show Startup Dialog Box", False
Application.CommandBars.AdaptiveMenus = False

On Error GoTo 0

You will note that Themed Form Controls are turned on, and this is a
access2003 feature. You can thus just remove that one line (on the other
hand, I do have on error..so, you could leave the above as is, being ready
for a2003 when you upgrade....).

The startup dialog box is also new for a2003. Regardless, most, if not all
my applications use the above code, runtime, or full production version.

And, if you are wondering what themed controls turn on, vs turned off look
like, take a look here:

http://www.attcanada.net/~kallal.msn/Atheme/index.htm

 

[BobV]

Al:

Thank you for your response. You are correct. What I meant to say is how do
I turn off the Adaptive menus. I used the
"Application.CommandBars.AdaptiveMenus = False" VBA statement, and it does
just what I want.

Thanks again,
BobV

 

[Brendan Reynolds]

Thanks Albert. There is still the issue, though, that this option is
Office-wide. You could, I suppose, save the existing value and restore it
when your app closes, but it will still affect any other Office applications
that are open when your app runs. And if there is another developer out
there who thinks that adaptive menus are a great idea (seems hard to
believe, but I guess someone at Microsoft must have thought so) who has code
in his application to turn them on, that's going to affect your application.

I don't like adaptive menus either (thanks again for giving us the right
terminology, that explains why I couldn't find anything in the KB!) but for
the above reasons, I'm inclined to leave it to the user to turn them off if
they want to.

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.

 

[Roger Carlson]

Ah, that explains it. Sorry.

I also hate adaptive menus, but I rarely turn them off. However, I DO use
code like the below to turn off Windows In the Taskbar option.

 

[BobV]

Brendan:

My users run my application under the Access Runtime; therefore, turning off
the Adaptive menus in the Runtime doesn't affect other Office applications.

BobV