View Single Post
 
Old 04-21-2011, 01:57 PM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,342
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

Hi Shay,

You could increase the zoom percentage from 100% to, say, 125%. Here's a macro I've developed. In addition to setting the zoom to maximum of 125% (less is used for documents that won't fit in that area - eg landscape A3 pages), the macro does a few other things: defaulting to Page Layout view, displaying the rulers and displaying the document's full path in Word's title bar. You can delete the code for any of those you're not interested in.
Code:
Sub AutoOpen()
With ActiveWindow
  'Reduce flickering while changing settings
  .Visible = False
  'Switch to Print Preview mode
  If .View.SplitSpecial = wdPaneNone Then
    .ActivePane.View.Type = wdPrintView
  Else
    .View.Type = wdPrintView
  End If
  With .ActivePane.View.Zoom
    'Set for a 1-page view
    .PageColumns = 1
    'Initialize for best fit
    .PageFit = wdPageFitBestFit
    'Test zoom % and reduce to 125% max
    If .Percentage > 125 Then .Percentage = 125
  End With
  'Display the Rulers
  .ActivePane.DisplayRulers = True
  'Displays the Document Path in the Title Bar
  .Caption = ActiveDocument.FullName
  'Restore the window now that we're finished
  .Visible = True
End With
End Sub
To use it, simply add it to Word's 'Normal' template: it runs automatically every time you open a document.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote