Thanks Kenneth. Sorry, I guess I could have provided more details...

I have a range "JobNumbers" which is JobNumbers = Worksheets("Input").Range("A3", Range("A3").End(xlDown)).
My workbook already creates sheets every time a new Job Number is added.
These sheets are copies of a template. The template is formatted such that the first page contains charts and tabular data that serve as a daily project update. Beyond the first page are data tables that populate the charts and do not need to be printed.


I need to select only the worksheets whose names match data in the JobNumbers range, print the first page only, and combine all of these pages into a single PDF file.

Does that clear anything up?