Установите "Подогнать ширину текста" по умолчанию при открытии документа Word

Question

У меня слабовидение, и поэтому я плохо читаю текстовые документы, если я не установил уровень масштабирования на "Подогнать ширину текста". Я делал это вручную, и мне было интересно, как установить его в качестве уровня масштабирования по умолчанию для всех документов, когда я их открываю

Answer 1

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

Следующим лучшим вариантом будет быстрый способ изменить настройки масштабирования для "подгонки текста" для любого загруженного документа, однако по какой-то причине эта команда отсутствует в меню параметров настройки клавиатуры, где обычно можно назначить комбинацию клавиш для конкретная команда. Вместо этого вы можете использовать встроенные команды клавиатуры, чтобы перейти к меню, нажав Alt + W + Q + Arrow, чтобы перейти к нужной опции, или настроить собственный макрос для этого и привязать его к сочетанию клавиш:

Sub SetFitTextZoom()
    ActiveWindow.View.Zoom.PageFit = wdPageFitTextFit
End Sub

Answer 2

Добавление нового модуля с этими двумя макросами в шаблон документа (как описано здесь), кажется, работает для меня:

Sub AutoOpen()
    ActiveWindow.View.Type = 3
    ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit
End Sub

Sub AutoNew()
    ActiveWindow.View.Type = 3
    ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit
End Sub

Вы должны разрешить макросы.
Офис 2010