Help me banish Web toolbar, please!

[Ed]

In my Word 2002 (XP) Normal.dot, I have the following code to banish the Web
and Reviewing toolbars. Unfortunately, they are not obeying! If I have a
document already open and open another one using a hyperlink, I am likely to
get the Web bar. Can I tweak this to stop it?
Ed

Sub AutoExec()
With Application.CommandBars("Reviewing")
.Enabled = False
.Visible = False
End With
With Application.CommandBars("Web")
.Enabled = False
.Visible = False
End With

Application.OnTime _
When:=Now + TimeValue("00:00:02"), _
Name:="RemoveBar", Tolerance:=3
End Sub

Sub RemoveBar()
With Application.CommandBars("Reviewing")
.Enabled = False
.Visible = False
End With
With Application.CommandBars("Web")
.Enabled = False
.Visible = False
End With
End Sub

 

[Helmut Weber]

Hi Ed,

this one works for me:

Sub Autoopen()
With Application.CommandBars("Web")
.Enabled = False
.Visible = False
End With
End Sub

plus in autoexec, maybe.

By the way, the I needed the ontime macro
only to get control over custom commandbars
which where located in templates other than normal dot.

 

[Ed]

Thanks, Helmut. Now if it were only so easy to vanquish the Copy Task Pane!
8>{
Ed