Метод Document.FitToPages (Word)

Уменьшение размера шрифта текста до тех пор, пока в документе не уместится на одной странице меньше.

Синтаксис

выражение. FitToPages

выражение (обязательно). Переменная, представляющая объект документа .

Примечания

Если Word не удается уменьшить количество страниц на единицу, возникнет ошибка.

Пример

В этом примере выполняется попытка уменьшить количество страниц активного документа на одну страницу.

On Error GoTo errhandler 
ActiveDocument.FitToPages 
errhandler: 
If Err = 5538 Then MsgBox "Fit to pages failed"

В этом примере выполняется попытка уменьшить количество страниц в каждом открытом документе на одну страницу.

For Each doc In Documents 
 doc.FitToPages 
Next doc

См. также

Объект документа

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.