This example retrieves a page window that contains the page Spain.htm and sets the view mode to Preview.
Note To run this procedure, you must have an open web that contains an open page called Spain.htm, or substitute a file of your choice.
Private Sub SetPagePreview()
Dim myPage As PageWindow
Set myPage = ActiveWebWindow.PageWindows("Spain.htm")
myPage.ViewMode = fpPageViewPreview
End Sub