Метод Document.FitToPages (Word)
Уменьшает размер шрифта текста настолько, чтобы документ помещался на одну страницу меньше.
Синтаксис
выражение. FitToPages
выражение (обязательно). Переменная, представляющая объект Document .
Замечания
Ошибка возникает, если 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 и обратная связь.