473,240 Members | 1,673 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,240 software developers and data experts.

invisible toolbar

With my command DoCmd.ShowToolbar "Toolbar1", acToolbarYes i make my
toolbar Toolbar1 visible.I want at the same time make all
other
toolbars on the screen invisible,regardless how they are
called.Sometimes i have
different toolbars shown and i am interested in a command
that does
not refer toa specific toolbar, but makes all the toolbats
on the
screeninvisible.Is it possible ?

May 28 '06 #1
2 1705
ADezii
8,834 Expert 8TB
With my command DoCmd.ShowToolbar "Toolbar1", acToolbarYes i make my
toolbar Toolbar1 visible.I want at the same time make all
other
toolbars on the screen invisible,regardless how they are
called.Sometimes i have
different toolbars shown and i am interested in a command
that does
not refer toa specific toolbar, but makes all the toolbats
on the
screeninvisible.Is it possible ?
This should do the trick:
On Error Resume Next

Dim MyCommandBar As CommandBar

For Each MyCommandBar In Application.CommandBars
If MyCommandBar.Name <> "Toolbar1" Then
MyCommandBar.Visible = False
End If
Next MyCommandBar
May 28 '06 #2

"solar" <sp*******@gmail.com> schreef in bericht news:11**********************@u72g2000cwu.googlegr oups.com...
With my command DoCmd.ShowToolbar "Toolbar1", acToolbarYes i make my
toolbar Toolbar1 visible.I want at the same time make all
other
toolbars on the screen invisible,regardless how they are
called.Sometimes i have
different toolbars shown and i am interested in a command
that does
not refer toa specific toolbar, but makes all the toolbats
on the
screeninvisible.Is it possible ?


I could not find a solution but maybe the command
DoCmd.RunCommand acCmdShowOnlyWebToolbar
will help you.
This command seems to make all toolbars invisible except the Toolbar "web" (if visible)

So I would try:
DoCmd.RunCommand acCmdShowOnlyWebToolbar
DoCmd.ShowToolbar "Web", acToolbarNo
DoCmd.ShowToolbar "Toolbar1", acToolbarYes

Arno R
May 28 '06 #3

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

15
by: Greg Schmidt | last post by:
We all know that one trick in dealing with old browsers is to add extra bits of content with class="old", where old is defined as display:none in a style sheet that is @imported so that old...
102
by: me | last post by:
How do I prevent the save/print/email/mypictures toolbar from popping up when IE users place their cursor over photos at my website? Thank you in advance for your help. Signed, me
6
by: Juan Pedro Gonzalez | last post by:
I wanted to add a Combobox to a toolbar... Kind of the look you get on VisualStudio's toolbar. I've been able to find some VB 6 samples, but the placeholder option is no longer available for...
1
by: Alfredo Barrientos | last post by:
Hi, I have a little trouble trying to assign a Toolbar control to another toolbar variable control. I am getting my forms controls with this: for (int j = 0; j <= frmChild.Controls.Count -...
2
by: graeme34 via AccessMonster.com | last post by:
Hi I was wondering if there was any way of making the windows for the currently opened objects in access invisible on the bottom toolbar. Iam using Access 2003 also is it possible to turn of the...
3
by: rockdale | last post by:
Hi, All: I have a datagrid with TemplateColumn as following: <asp:TemplateColumn Visible="False" > <ItemStyle Width="0px"></ItemStyle> <ItemTemplate> <asp:Label id="lblMin_Value"...
4
by: Gerhard | last post by:
I have an MS Access app with multiple forms. One of the forms has a Toolbar (MsComctlLib.Toolbar) and it works as advertised. I handle the buttons in the Toolbar1_ButtonClick event. I would like...
3
by: Undergrid | last post by:
Hi All, I've got a few toolbars in my application hosted in a ToolStripContainer. I have found a problem whereby the location of a toolbar is not restored when doing a LoadSettings if the...
9
by: Mel | last post by:
I have 10 columns total. 3 of them are invisible. The rest are read- only BoundFields, 3 of which are editable fields using TemplateFields. Upon editing, I want to validate what the user enters...
3
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 3 Jan 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). For other local times, please check World Time Buddy In...
0
by: abbasky | last post by:
### Vandf component communication method one: data sharing ​ Vandf components can achieve data exchange through data sharing, state sharing, events, and other methods. Vandf's data exchange method...
2
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 7 Feb 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:30 (7.30PM). In this month's session, the creator of the excellent VBE...
0
by: stefan129 | last post by:
Hey forum members, I'm exploring options for SSL certificates for multiple domains. Has anyone had experience with multi-domain SSL certificates? Any recommendations on reliable providers or specific...
0
Git
by: egorbl4 | last post by:
Скачал я git, хотел начать настройку, а там вылезло вот это Что это? Что мне с этим делать? ...
1
by: davi5007 | last post by:
Hi, Basically, I am trying to automate a field named TraceabilityNo into a web page from an access form. I've got the serial held in the variable strSearchString. How can I get this into the...
0
by: DolphinDB | last post by:
The formulas of 101 quantitative trading alphas used by WorldQuant were presented in the paper 101 Formulaic Alphas. However, some formulas are complex, leading to challenges in calculation. Take...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: Aftab Ahmad | last post by:
So, I have written a code for a cmd called "Send WhatsApp Message" to open and send WhatsApp messaage. The code is given below. Dim IE As Object Set IE =...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.