Hello -
Looking for a way to set the print area on a large number of simiarly
formatted worksheets at once. Ideally want to incorporate it into a
macro that does some other basic stuff as well.
Thanks for any suggestions!


--
annabel
------------------------------------------------------------------------
annabel's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=26520
View this thread: http://www.excelforum.com/showthread.php?threadid=397879

Re: setting print area for multiple worksheets at once by dominicb

dominicb
Tue Aug 23 03:03:49 CDT 2005


Good morning Annabel

This code will loop through all your worksheets in a workbook and se
the range to A1:F30.

Sub SetRange()
For Each UsrSht In ActiveWorkbook.Worksheets
UsrSht.PageSetup.PrintArea = "$A$1:$F$30"
Next UsrSht
End Sub

HTH

Dominic

--
dominic
-----------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=1893
View this thread: http://www.excelforum.com/showthread.php?threadid=39787


Re: setting print area for multiple worksheets at once by annabel

annabel
Tue Aug 23 14:29:03 CDT 2005


Thank you so much for your response. That is just what I needed.
I appreciate your help!


--
annabel
------------------------------------------------------------------------
annabel's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=26520
View this thread: http://www.excelforum.com/showthread.php?threadid=397879