Help with print setup

[Daniel]

Hi

I am using Excel 2000 SP3.
I have a Workbook with 59 worksheets
and need to print out a part
of each worksheet, it is the same area
on every worksheet, is there a way I can set this up without having to set
Print area and Page setup
on each worksheet.

thanks

Daniel

 

[Dave Peterson]

Group all the worksheets.

Right click on a worksheet tab
select "select all sheets"

do the page setup once.

rightClick on any of the worksheet tabs and select "ungroup sheets"

If you leave those sheets grouped and start working on them, then almost
everything you do to one, you do to all in the group. It can be dangerous!

 

[Daniel]

Thanks

How do I set the print area?

thanks

Daniel

 

[Dave Peterson]

Ouch!
I wrote too quickly! It won't work the way I described.

How about a macro?

Option Explicit
Sub testme()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PageSetup.PrintArea = "a1:c99"
Next wks
End Sub

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

===
But there are lots of things you can do in page setup for more than one
sheet--printarea ain't one of them, though.

Sorry.

 

[Daniel]

Okay

I'll give macros a go.

thanks for your help

Daniel

 

[Daniel]

Okay, it worked

thanks again

Daniel

Ouch!
I wrote too quickly! It won't work the way I described.

How about a macro?

Option Explicit
Sub testme()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.PageSetup.PrintArea = "a1:c99"
Next wks
End Sub

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

===
But there are lots of things you can do in page setup for more than one
sheet--printarea ain't one of them, though.

Sorry.