macro to toggle Autotext Menu on & off

J

JustSomeGuy

Seems like it should go something like this - but it doesn't work:

Sub ViewAutotextMenu()
IF CommandBars("AutoText").Visible = True
Then CommandBars("AutoText").Visible = False
End If
if CommandBars("AutoText").Visible = False
Then CommandBars("AutoText").Visible = True
End If
End Sub
 
G

Graham Mayor

Sub ViewAutotextMenu()
With CommandBars("AutoText")
.Visible = Not .Visible
End With
End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
Top