How do I set print areas for multiple sheets simultaneously?

[Guest]

How do I set identical print areas for multiple sheets in the same workbook
simultaneously?

 

[Dave Peterson]

Can you use a macro?

Option Explicit
Sub testme()
Dim wks As Worksheet
For Each wks In ActiveWindow.SelectedSheets
With wks
.PageSetup.PrintArea = "A1:X99"
End With
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

 

[Dave Peterson]

Ps. You have to group the worksheets that should have the same print area
before running the macro.

Click on the first worksheet tab and ctrl-click on subsequent.

And after, rightclick on one of the grouped sheets and select ungroup sheets.

 

[Guest]

Thanks for that information. I'll give it a try.