How can I set a print area from a known range and then print it. I have tried:
Dim myrange As Range
Workbooks(fname).Worksheets("Invoice").Activate
Set myrange = Workbooks(fname).Worksheets("Invoice").Range("A5:L48")
ActiveSheet.PageSetup.PrintArea = myrange.address
This code errors out on the
Activesheet.pagesetup.printarea = myrange.address
John
Dim myrange As Range
Workbooks(fname).Worksheets("Invoice").Activate
Set myrange = Workbooks(fname).Worksheets("Invoice").Range("A5:L48")
ActiveSheet.PageSetup.PrintArea = myrange.address
This code errors out on the
Activesheet.pagesetup.printarea = myrange.address
John