Outlook 2010: установить уровень масштабирования по умолчанию для чтения сообщений

Question

Открывая сообщения в Outlook 2010 (не используя панель чтения), вы можете удерживать элемент управления и поворачивать колесико мыши вверх, чтобы увеличить масштаб сообщения, но вы должны делать это каждый раз, когда открываете сообщение.

Есть ли способ установить уровень масштабирования по умолчанию для сообщений? Например, установите уровень масштабирования по умолчанию равным 150% для каждого сообщения.

В противном случае, есть ли другой способ сделать текст по умолчанию больше при чтении сообщений? (без изменения настроек DPI в ОС)

Answer 1

Это нормальное поведение для Outlook 2010; он не сохраняет настройки масштабирования. Единственный вариант - создать макрос, который запускается при запуске, или использовать надстройку для управления масштабированием.

Вот как добавить VBA, чтобы установить уровень масштабирования при запуске приложения.

1. Установите уровень безопасности вашего макроса на Низкий.
2. Откройте редактор VB, используя Alt+F11
3. Разверните Project1, чтобы показать ThisOutlookSession
4. Вставьте макрос в ThisOutlooksession
5. Установить ссылку на Microsoft Word в Инструменты, Ссылки
6. Нажмите в макросе Application_Startup и нажмите кнопку « Run , чтобы запустить его без перезагрузки Outlook.

---

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_Quit()
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 = 150
End Sub

Примечание. От второй до последней строки указывается процент увеличения. Измените 150 на процент, который вы хотите.

Источник - настройка масштаба в Outlook в электронной почте

Answer 2

Я нашел дополнение под названием ZoomIn, которое добавляет кнопку на ленте, чтобы сохранить масштаб для всех открываемых вами сообщений (вы также можете изменить его, когда захотите). Единственным недостатком является то, что это платный инструмент.