Shows a preview of the object as it would look when printed.
expression.PrintPreview
expression Required. An expression that returns an object in the Applies To list.
Example
This example displays Sheet1 in print preview.
Worksheets("Sheet1").PrintPreview