VBA/Excel/Access/Word/Excel/Page Orientation

Материал из VB Эксперт
Перейти к: навигация, поиск

To control orientation

 
Sub PrintRpt1()   "
    Sheets(1).PageSetup.Orientation = xlLandscape
    Range("Report").PrintOut Copies:=1
End Sub
Источник — «http://www.vbex.ru/index.php?title=VBA/Excel/Access/Word/Excel/Page_Orientation&oldid=1546»