Как настроить масштаб области чтения Outlook?

Я знаю, что мы можем использовать Ctrl + Mouse Wheel для увеличения и уменьшения изображения, но существует ли способ постоянно устанавливать масштаб по умолчанию для панели чтения?

Это похоже на параметры DPI на вашем компьютере, а также уровень масштабирования, установленный в Outlook.

Одно может быть, чтобы изменить размер текста на электронные письма –

Настроить размер шрифта для сообщений обычного текста

Для обычного текста вы можете изменить шрифт дисплея через

  • Outlook 2007 и предыдущий:
    Инструменты → Параметры … → вкладка Формат письма → кнопка «Канцелярские и шрифты» (или только «Шрифты» … в предыдущих версиях Outlook)
  • Outlook 2010:
    Файл → Функции → раздел Почта → кнопка Канцелярские товары и шрифты

Источник: Увеличить шрифт в области чтения – MSOutlook.info

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

  • Начало – Microsoft Office – Инструменты и Microsoft Office – цифровой сертификат для Project VBA, создайте сертификат с именем, например Zoom
  • Запустить Outlook
  • Файл – Параметры – Центр доверия – Параметры центра доверия – Параметры, выберите Макросы или «Уведомление обо всех макросах» или «Уведомление о макросах с цифровой подписью, все неподписанные макросы отключены»
  • Alt + F11 – запустить редактор VBA
  • В верхнем левом окне щелкните по проекту Project Project – MS Outlook Object и дважды щелкните на ThisOutlookSession
  • Справа открывается окно ( View.Zoom.Percentage = 150 - scale по умолчанию)
  • Инструменты – Ссылки, проверьте библиотеку объектов Microsoft Word 14.0
  • F5 – введите имя, например, «Zoom – Create»
  • Инструменты – Цифровая подпись: выберите подпись, которую мы создали ранее с именем Zoom
  • Файл – сохранить
  • Alt + Q
  • Перезапустить 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 

Я шокирован тем, что нет лучшего ответа для Outlook 2010 на Windows 7, поэтому я буду проверять. То, что я поселил, довольно плохой: использование функции «Сделать это проще для чтения, что на вашем экране» в Windows 7, и установить общее увеличение до 125%. К сожалению, вам нужно выйти и войти в систему, чтобы увидеть эффект, из-за которого боль в эксперименте.

Эта функция доступна в Windows 7, щелкнув правой кнопкой мыши на рабочем столе, выбрав «Разрешение экрана», а затем нажав «Сделать текст и другие предметы больше или меньше» внизу. Существует также опция «Установить размер пользовательского текста (DPI)», но я не нашел времени, чтобы попробовать его. Вы также можете получить доступ к этому диалоговому окну, набрав «Сделать его легче читать» в поиске панели управления.

Изображение, показывающее начальное диалоговое окно разрешения экрана

Изображение, показывающее выбор 100%, 125% и 150%

Я пробовал 150%, но это вызвало неприемлемую деградацию шрифтов в некоторых программах, таких как MATLAB. На 125% я недоволен некоторыми эффектами, но это справедливый баланс, чтобы читать электронную почту без увеличения на каждое сообщение. С другой стороны, это большой недостаток, чтобы преодолеть недостатки в одном приложении, поэтому я думаю, что могу просто переключиться на этот режим, когда у меня будет много писем для чтения, а затем вернусь назад – несмотря на то, что выходите из него дважды и дважды!

Здесь обновлен код Outlook VBA, который изменяет размеры как открытых сообщений, так и области чтения. Microsoft заблокировала доступ к параметру Zoom, поэтому вам нужно будет сначала установить драйверы Redemption ( http://www.dimastr.com/redemption/home.htm ), а затем в VBA Tools / References активировать «Библиотеку объектов Microsoft Word 15.0» и « Перспективы выкупа и MAPI COM Library ». Вставьте и запустите приведенный ниже код, масштабирование будет установлено в константе MsgZoom.

 Option Explicit Dim WithEvents objInspectors As Outlook.Inspectors Dim WithEvents objOpenInspector As Outlook.Inspector Dim WithEvents objMailItem As Outlook.MailItem Dim WithEvents myOlExp As Outlook.Explorer Dim sExplorer As Object Dim Document As Object Dim Msg Const MsgZoom = 130 Private Sub Application_Startup() Set objInspectors = Application.Inspectors Set myOlExp = Application.ActiveExplorer Set sExplorer = CreateObject("Redemption.SafeExplorer") 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 = MsgZoom End Sub Private Sub myOlExp_SelectionChange() On Error GoTo ErrHandler: Set Msg = Application.ActiveExplorer.Selection(1) Application.ActiveExplorer.RemoveFromSelection (Msg) Application.ActiveExplorer.AddToSelection (Msg) sExplorer.Item = Application.ActiveExplorer Set Document = sExplorer.ReadingPane.WordEditor Document.Windows.Item(1).View.Zoom.Percentage = MsgZoom Exit Sub ErrHandler: Exit Sub End Sub 

Я искал решение, которое поможет в этом также в Outlook 2013, и просто наткнулся на стороннее коммерческое дополнение, чтобы помочь с этим под названием «Zoom Email Add Add In» с http://www.sperrysoftware.com/ Outlook / zoom-email-windows.asp .

Я только что установил пробную версию в 32-битной версии Outlook 2013 и хорошо работает для меня, то есть автоматически устанавливает значение масштабирования в области чтения для того, что я настроил. Я хотел предложить это, если вы все еще ищете решение.

Я работал над Outlook 2013, выполнив шаги, описанные в видео ниже.

Это видео показывает все это.

https://www.youtube.com/watch?v=2akC2FAs3hM&feature=youtu.be

Код VBA Outlook находится по ссылке ниже; https://www.slipstick.com/outlook/adjust-outlooks-zoom-setting/

Давайте будем гением компьютера.