G Guest Feb 19, 2004 #1 I am trying to print different sections of the same sheet in landscape and portrait. I use office 2003
I am trying to print different sections of the same sheet in landscape and portrait. I use office 2003
F Frank Kabel Feb 19, 2004 #2 Hi you may try the following macro Sub print_different() With ActiveSheet.PageSetup .PrintArea = "$A$1:$C$16" .Orientation = xlPortrait End With ActiveWindow.SelectedSheets.PrintOut With ActiveSheet.PageSetup .PrintArea = "$A$17:$C$26" .Orientation = xlLandscape End With ActiveWindow.SelectedSheets.PrintOut End Sub Change the two ranges according to your spreadsheet layout
Hi you may try the following macro Sub print_different() With ActiveSheet.PageSetup .PrintArea = "$A$1:$C$16" .Orientation = xlPortrait End With ActiveWindow.SelectedSheets.PrintOut With ActiveSheet.PageSetup .PrintArea = "$A$17:$C$26" .Orientation = xlLandscape End With ActiveWindow.SelectedSheets.PrintOut End Sub Change the two ranges according to your spreadsheet layout