simple? print area?
try
ActiveSheet.PageSetup.PrintArea=prtselect.address
"John" wrote:
I get unable to set print area error on the last line of code...
Range("b12:" & Range("j65536").End(xlUp).Address).Select
Set prtselect = Selection
ActiveSheet.PageSetup.PrintArea = prtselect
any help is appreciated!
|