Yes, I do. I don't have a clue how to do this.
"Bernard Liengme" wrote:
Try this subroutine
Sub Macro1()
For Each ws In Worksheets
ws.Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$E$20"
Next
End Sub
Let me know if you need help adding a macro
best wishes
--
Bernard V Liengme
www.stfx.ca/people/bliengme
remove caps from email
"oceanmist" wrote in message
...
I have a workbook with 12 worksheets in it. They are all basically the
same
so when I set the print area for one it could be the same for all 12
worksheets. Is there a way to do this all at once rather than 12 times?