FitToPages Method

  • Article

Decreases the font size of text just enough so that the document will fit on one fewer pages. An error occurs if Word is unable to reduce the page count by one.

expression**.FitToPages**

expression Required. An expression that returns a Document object.

Example

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

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.

For Each doc In Documents
    doc.FitToPages
Next doc

Applies to | Document Object

See Also | FullScreen Property