horizontal ruler disappears

E

Elizabeth

This question is for a friend who keeps losing her horizontal ruler. She
works in Normal view. Every time she goes into Word, the ruler is missing
and she has to go to View/Ruler and tick to put it back.
 
G

Graham Mayor

Change the view setting -
http://word.mvps.org/FAQs/General/SaveViewAndZoom.htm
or
You can control the view with auto macros in normal.dot. The following will
set the rulers for each document regardless. Change the 100 to any preferred
zoom level. I have included also some of the other regular problem fixes,
but you can remove the extra lines if required. If you want print layout
rather than normal view swap the apostrophe from the beginning of the line
where indicated to the other.

See http://www.gmayor.com/installing_macro.htm

Sub AutoNew()
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View
'**********************
' .Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

Sub AutoOpen()
ActiveWindow.Caption = ActiveDocument.FullName
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View

'**********************
'.Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

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


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
E

Elizabeth

Thanks, I have pass this on to her.

Graham Mayor said:
Change the view setting -
http://word.mvps.org/FAQs/General/SaveViewAndZoom.htm
or
You can control the view with auto macros in normal.dot. The following will
set the rulers for each document regardless. Change the 100 to any preferred
zoom level. I have included also some of the other regular problem fixes,
but you can remove the extra lines if required. If you want print layout
rather than normal view swap the apostrophe from the beginning of the line
where indicated to the other.

See http://www.gmayor.com/installing_macro.htm

Sub AutoNew()
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View
'**********************
' .Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

Sub AutoOpen()
ActiveWindow.Caption = ActiveDocument.FullName
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View

'**********************
'.Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

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


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
E

Elizabeth

Thanks, I have passed this on to her.

Graham Mayor said:
Change the view setting -
http://word.mvps.org/FAQs/General/SaveViewAndZoom.htm
or
You can control the view with auto macros in normal.dot. The following will
set the rulers for each document regardless. Change the 100 to any preferred
zoom level. I have included also some of the other regular problem fixes,
but you can remove the extra lines if required. If you want print layout
rather than normal view swap the apostrophe from the beginning of the line
where indicated to the other.

See http://www.gmayor.com/installing_macro.htm

Sub AutoNew()
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View
'**********************
' .Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

Sub AutoOpen()
ActiveWindow.Caption = ActiveDocument.FullName
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
With ActiveWindow.View

'**********************
'.Type = wdPrintView
.Type = wdNormalView
'**********************
.Zoom.Percentage = 100
.DisplayPageBoundaries = True
End With
End Sub

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


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top