Landscape entire workbook
 

Is there a way to set an entire workbook to print in landscape without having
to select/set each sheet individually? This would be after the workbook has
been created.

Landscape entire workbook
 

right click on the sheet tab, file page setup, landscape

hth
--
regards from Brazil
Thanks in advance for your feedback.
Marcelo



"Carol" escreveu:

Is there a way to set an entire workbook to print in landscape without having
to select/set each sheet individually? This would be after the workbook has
been created.

Landscape entire workbook
 

If you want to landscape all worksheets, the following macro will do that for
you:

Sub LandscapeAll()

Dim wb As Workbook
Dim ws As Worksheet

Set wb = ActiveWorkbook

For Each ws In wb.Worksheets
ws.PageSetup.Orientation = xlLandscape
Next ws

Set wb = Nothing
Set ws = Nothing

End Sub

--
Kevin Backmann


"Carol" wrote:

Is there a way to set an entire workbook to print in landscape without having
to select/set each sheet individually? This would be after the workbook has
been created.

Landscape entire workbook
 

Carol

Right-click on a sheet tab and "select all sheets"

Set the active sheet for Landscape and all sheets will be done.

DO NOT FORGET to right-click and "ungroup" after.


Gord Dibben MS Excel MVP

On Fri, 6 Oct 2006 07:40:02 -0700, Carol
wrote:

Is there a way to set an entire workbook to print in landscape without having
to select/set each sheet individually? This would be after the workbook has
been created.