Word 2003 has a tendency to lose some of its setup options. The requirements
can easily be forced with macros and the common problem settings (at least
those that trouble me) are included in the sample code below:
Sub AutoNew()
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
With ActiveWindow.View
.Type = wdPrintView
'.Type = wdNormalView
.Zoom.Percentage = 100
.FieldShading = wdFieldShadingWhenSelected
.ShowFieldCodes = False
.DisplayPageBoundaries = True
End With
CommandBars("Reviewing").Visible = False
CommandBars("Drawing").Visible = False
End Sub
Sub AutoOpen()
ActiveWindow.Caption = ActiveDocument.FullName
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
With ActiveWindow.View
.Type = wdPrintView
.Zoom.Percentage = 100
.FieldShading = wdFieldShadingWhenSelected
.ShowFieldCodes = False
.DisplayPageBoundaries = True
End With
End Sub
Sub AutoExec()
CommandBars("Reviewing").Visible = False
CommandBars("Drawing").Visible = False
Application.OnTime _
When:=Now + TimeValue("00:00:01"), Name:="CodesOff"
End Sub
Sub CodesOff()
On Error GoTo oops
ActiveWindow.ActivePane.View.ShowAll = False
oops:
End Sub
See
http://www.gmayor.com/installing_macro.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site
www.gmayor.com
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>