Word) (Document.FitToPages 方法

適當地降低文字的字型大小，讓文件能容納在減少一頁的頁面中。

語法

expression. FitToPages

需要 expression。 代表 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

另請參閱

Document 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。