I've tried dozens of ways to try to get print ranges on multiple sheets to print to a single pdf file. What I have finally done is created an array in my macro to grab the print areas from several pages:
prntarray = Array(Sheet12.Range("Print_Area").Name, Sheet23.Range("Print_Area").Name,...)
The array now looks like this:
prntarray(0) "=B!$A$6:$L$23"
prntarray(1) "=A!$B$6:$AR$177"
.
.
.
Now how do I select all of those ranges so that the following print statment works?
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:=
PrintTo & ".pdf", Quality:=xlQualityMinimum, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
I'm wondering if I need to concatenate all of the print ranges into one big print range first and if so, how would I do that?
Thanks.
Bookmarks