PageRows Property
Returns or sets the number of pages to be displayed one above the other on-screen at the same time in print layout view or print preview. Read/write Long.
expression.PageRows
expression Required. An expression that returns a Zoom object.
Example
This example switches the active window to print preview and displays two pages one above the other.
PrintPreview = True
With ActiveDocument.ActiveWindow.View.Zoom
.PageColumns = 1
.PageRows = 2
End With