Sub Autonew()
CommandBars("Reviewing").Visible = False
End Sub
Sub AutoOpen()
ActiveWindow.Caption = ActiveDocument.FullName
CommandBars("Reviewing").Visible = False
End Sub
See http://www.gmayor.com/installing_macro.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><
Graham Mayor - Word MVP
My web site www.gmayor.com
Word MVP web site www.mvps.org/word
Will the macros also work in Excel?
Thanks,
Mike
>.
>
Sub Auto_Open()
CommandBars("Reviewing").Visible = False
End Sub
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
Word MVP web site http://word.mvps.org