This page last revised: 02 Jan 2013 09:28:24 -0600 .
How can I get rid of the web toolbar?
Why get rid of the web toolbar?
How to get rid of the web toolbar ...
There are four methods to be looked at. The first two use macros. If you don't know how to use macros like these, take a look at Macros and VBA.
Document-specific macro - put in "ThisDocument" object
Private Sub Document_Open() On Error Resume Next Application.CommandBars("Web").Enabled = False On Error GoTo 0 End Sub Private Sub Document_Close() On Error Resume Next Application.CommandBars("Web").Enabled = True On Error GoTo 0 End Sub
Global - Get rid of the Web Toolbar in Word
Sub ToggleWebToolbarEnabled() With Application.CommandBars("Web") .Enabled = Not .Enabled If .Enabled = True Then .Visible = True End If End With End Sub
See Template Basics for information about Normal.dot and other global templates.
For the Reviewing toolbar you would use the following macro instead:
Method 3 - Add-In from this site
I've adapted Pieter Janssen's code to meet my own needs. Feel free to download and see if it works for you. You can download it from my downloads page.
Method 4 - Add-In from Pieter Janssen
I've created an add-in just for this purpose. you can download it from:
(right-click on disablewebbar.dot and save target to disk)
Link disabled because page is no longer available.
See also MVP site: http://www.word.mvps.org/FAQs/MacrosVBA/BanishWebToolbar.htm
Off-topic - but did you know that you can't
record a macro using the web toolbar? A workaround is discussed at: http://support.microsoft.com/support/kb/articles/Q212/6/42.ASP
I want my Web Toolbar information back! - Word 2007 - Word 2010
In Word 2007 and 2010 there is no web toolbar (or for that matter any toolbar). A poster wanted to know how to get the filename and path information provided by that toolbar. Here are two suggestions:
Solution 1 - use a field
Solution 2 - use vba
Sub ShowAddress() Dim strTemp As String strTemp = InputBox("This is the URL from the Web toolbar", "Excavated!", _ ActiveDocument.CommandBars("Web").FindControl(ID:=1740).Text) End Sub
The following code returns the same information without accessing the toolbar:
Sub ShowPathAndName() Dim strTemp As String strTemp = InputBox("This is the FullName of the ActiveDocument", "Excavated!", ActiveDocument.FullName) End Sub
From Windows Secrets Lounge JScher
The up-to-date version of this FAQ may be found at:
Download this FAQ in Word 97 format
Changes / suggestions / ideas can be sent to Charles Kenyon.
views since 13 April 2004
Many people visit this site and use the information it
Copyright 2000-2013 Charles Kyle Kenyon
FAQ provided as an adjunct / hobby as a part of my web site as a
criminal defense lawyer.