To control orientation : Page Orientation « Excel « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Excel
3. Page Orientation

To control orientation

 
Sub PrintRpt1()   '
    Sheets(1).PageSetup.Orientation = xlLandscape
    Range("Report").PrintOut Copies:=1
End Sub

 

Related examples in the same category