PDA

View Full Version : Portrait and landscape when printing same worksheet



khaledocom
05-18-2011, 03:22 AM
Hi gents,

I have one work sheets contains two pages.

I want to print the first page portrait and second landscape.

Is it possible?, please help.

Thankful for your support and cooperation.

mancubus
05-18-2011, 04:27 AM
this is a vba solution. change print area to suit your file.



Sub prt_port_land()

With ActiveSheet.PageSetup
'set other parameters
.PrintArea = ""
.PrintArea = "$A$1:$I$58"
.Orientation = xlPortrait
End With
ActiveSheet.PrintOut

With ActiveSheet.PageSetup
'set other parameters
.PrintArea = ""
.PrintArea = "$A$61:$L$90"
.Orientation = xlLandscape
End With
ActiveSheet.PrintOut
End Sub