Document.FitToPages Method

Word Developer Reference

Decreases the font size of text just enough so that the document will fit on one fewer pages.

Syntax

expression.FitToPages

expression   Required. A variable that represents a Document object.

Remarks

An error occurs if Word is unable to reduce the page count by one.

Example

This example attempts to reduce the page count of the active document by one page.

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

This example attempts to reduce the page count of each open document by one page.

Visual Basic for Applications
  For Each doc In Documents
    doc.FitToPages
Next doc

See Also