Mega Code Archive
Categories
/
VisualBasic Script
/
Word
Change the document view to print view
Sub view() Documents("Sample.doc").Windows(1).View.Type = wdOutlineView End Sub