ID: Q109760
The information in this article applies to:
This article contains a sample macro that demonstrates the use of the following WordBasic statements and functions:
ViewToolbars
ViewBorderToolbar
ViewDrawingToolbar
This article supplements the information in online Help. To open this Help
topic, click Contents on the Help menu and then click the "Programming
with Microsoft Word" topic.
Syntax:
ViewToolbars [.Toolbar = text] [, .Context = number] [, .ColorButtons = number] [, .LargeButtons = number] [, .ToolTips = number] [, .Reset] [, .Delete] [, .Show] [, .Hide]
Example:
The following sample macro prompts the user for a toolbar to view. After the toolbar is displayed, the macro asks the user if the toolbar should then be hidden. Run the macro and type "Microsoft" (without the quotation marks).
Sub MAIN
On Error Goto done
name$ = InputBox$("What is the name of the toolbar you would \
like displayed?")
ViewToolbars .Toolbar = name$, .Show
n = MsgBox("Would you like to hide the " + name$ + " toolbar?", 35)
Select Case n
Case - 1
ViewToolbars .Toolbar = name$, .Hide
Case Else
End Select
done:
End Sub
There are two additional commands that can also be used to display and hide
certain toolbars:
Example:
Sub Main
MsgBox "Choose OK to toggle the Border Toolbar on or off."
ViewBorderToolbar
End Sub
Example:
Sub Main
MsgBox "Choose OK to toggle the Drawing Toolbar on or off."
ViewDrawingToolbar
End Sub
Both of the previous macros display the toolbar if the toolbar is
hidden and hide the toolbar if it is displayed.
Additional query words:
Keywords : kbmacro kbprg kbdtacode kbmacroexample winword macword word6 word7 word95
Version : WINDOWS:6.0,6.0a,6.0c,7.0; MACINTOSH:6.0,6.0.1
Platform : MACINTOSH WINDOWS
Issue type : kbhowto kbinfo
Last Reviewed: March 28, 1998