Outlook & Word - How to set default display font size ?

[Frank]

For both Outlook and Word 2003:
How can I set the default size of the displayed (not printed) font
size for both? A friend needs to have a larger size than the default
message headers in Outlook to be able to read them. Lowering the
screen resolution would help, but causes many other problems.

Much of her mail contains Word documents, which will open in Word but
with too small a font. The View menu allows for increasing the
display size to 125% or 150%, but it reverts to 100% (too small) for
each message. How does one set the default to something other than
100%, or specify a font/size for the displayed text?

The problems make Outlook so much of a hassle as to make it unusable
for her. Is there a solution, or must I switch her to Mozilla? (She
is not really amenable to switching programs.)

Frank

 

[Graham Mayor]

Word opens at the display resolution the document was saved at. You can
force Word to override that with a simple pair of macros saved in
normal.dot. The following should set the view at 185%. You can change that
to whatever you like, by changing the appropriate numbers. You can type the
numbers directly in the zoom dialog to experiment until you get a zoom that
suits then transfer the figure to the macros. The macros set a couple of
other parameters also. It will probably be useful to keep them.
See http://www.gmayor.com/installing_macro.htm if you don't know what to do
with the listings.

For Outlook suggestions the Outlook guys will no doubt add to the thread
given that you have cross-posted it.

Sub AutoNew()
ActiveWindow.ActivePane.DisplayRulers = True
ActiveWindow.ActivePane.View.ShowAll = False
With ActiveWindow.View
.Type = wdPrintView
.Zoom.Percentage = 185
.FieldShading = wdFieldShadingWhenSelected
.ShowFieldCodes = False
.DisplayPageBoundaries = True
End With
CommandBars("Reviewing").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 = 185
.FieldShading = wdFieldShadingWhenSelected
.ShowFieldCodes = False
.DisplayPageBoundaries = True
End With
End Sub


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


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

 

[Frank]

Thanks for the help. I never thought it could be more than a hard to
find preference setting, so I appreciate all the detailed
instructions. I still haven't seen any response to the Outlook part
of the problem, so I'll repost in just the Outlook group soon.