☰

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

tag-icon • tag-icon microsoft-outlook microsoft-outlook-2010
Outlook 2010: установка уровня масштабирования по умолчанию для чтения сообщений

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

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

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

решение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 в электронной почте

решение2

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

Связанный контент