Displaying selected Toolbars

[Rosellina]

I am fairly new at VBA, any help is greatly appreciated.
I have set up a template - for all documents based on this template ONLY a
custom toolbar should be displayed. I can do this the "long way round" by
using the following in an AutoNew macro:
CommandBars("MyToolbar").Visible = True
CommandBars("Task Pane").Visible = False
CommandBars("Formatting").Visible = False
CommandBars("Standard").Visible = False
etc etc.
As the template will be used by various users, my problem is, how do I
return Word defaults to what they were before using my template. At present
I am using the following commands in an AutoClose macro, to restore commonly
used toolbars like Standard and Formatting:
CommandBars("Formatting").Visible = True
CommandBars("Standard").Visible = True
but of course different users have different toolbars (Drawing etc.)
normally displayed. Can any body help me with this problem? I have tried
using the Customization Context command, but I don't seem to get it right.
Thanks for your help

 

[Helmut Weber]

Hi Rosellina,

well, in Word 2003 there are 142 commandbars.
You may check, which commandbars are visible,

like, with an empty doc for testing:

Dim oCmd As CommandBar
For Each oCmd In ActiveDocument.CommandBars
If oCmd.Visible = True Then
Selection.TypeText oCmd.Index & " " & oCmd.Name
Selection.TypeText vbCr
End If
Next

Then, I don't think there is another way,
you have to store the values you get somewhere,
e.g. in a documentvariable,
or in some documentvariables,
and restore the commandbars before closing.


--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"

 

[Rosellina]

Thank you Helmut, this is great. I will try and work on this, to feed the
commandbars no.s to my macros, so that I can make them visible again at the
end of the Word session (AutoClose in my template file).

I should have said, but I work with Word 2002.

Thanks once again for the prompt and excellent help.