• July 17, 2017
    Announcement: New site design for Microsoft Community

    In July, Microsoft will roll out the first of ongoing site improvements aimed to modernize Microsoft Community and help customers get the most out of their community experience.

    • During the roll out period, you may see the old or new site design depending on your location

    • We expect the roll out to finish by 31 July

    Note: Past private message conversations will not move to the new site design. Please save any private messages you would like to keep.

     Learn more about the upcoming site improvements in this thread.

    Thank you for being part of Microsoft Community!


Outlook 2010 reading pane option - want to permanently adjust the zoom setting.

Jcoy asked on
Greetings, I know that there are a number of ways to adjust the zoom on the reading pane in outlook 2010. But how do i make the change permanent so that it does not go back to 100%.

There are two ways to temporarily increase or decrease the zoom level in the Microsoft OutlookReading Pane(Reading Pane: A window in Outlook where you can preview an item without opening it. To display the item in the Reading Pane, click the item.).

Do one of the following:

  • Use the Zoom control at the bottom of the Outlook window.

  • If you are using a mouse with a wheel control, click in the Reading Pane, press CTRL, and roll the scroll wheel. Rolling the wheel away from you makes the contents larger, rolling the wheel toward you makes the contents smaller.

 Note    The zoom affects only the current item that is previewed. When you select another item or folder, the Reading Pane returns to the default 100% size.

thank you.

***Post moved by the moderator to the appropriate forum category.***

63 people had this question

Abuse history

The answered status icon Answer
Hassan El-Meligy replied on

While you are in outlook do the following

  1. Press Alt-F11 to invoke the VBA Editor
  2. On the left side locate ThisOutlookSession
  3. Double click on ThisOutlookSession
  4. On the right window of the screen copy and paste the following code
  5. Click on Save
  6. Quit VBA Editor Alt-Q

Option Explicit
Dim WithEvents objInspectors As Outlook.Inspectors
Dim WithEvents objOpenInspector As Outlook.Inspector
Dim WithEvents objMailItem As Outlook.MailItem
Private Sub Application_Startup()
Set objInspectors = Application.Inspectors
End Sub

Private Sub Application_Quite()
Set objOpenInspector = Nothing
Set objInspectors = Nothing
Set objMailItem = Nothing
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If Inspector.CurrentItem.Class = olMail Then
Set objMailItem = Inspector.CurrentItem
Set objOpenInspector = Inspector

End If
End Sub
Private Sub objOpenInspector_Close()

Set objMailItem = Nothing
End Sub

Private Sub objOpenInspector_Activate()

Dim wdDoc As Word.Document
Set wdDoc = objOpenInspector.WordEditor
wdDoc.Windows(1).Panes(1).View.Zoom.Percentage = 140

End Sub

Business Information and Infrastructure Architect.
2 people found this helpful

Abuse history