VBA to insert sequential page numbers of visible worksheets ONLY

[SpencerRichman]

I have a workbook with 10 or so worksheets. The first worksheet is an 'input' page, and depending on what kinds of information the user inputs, some of the other worksheets either get hidden or unhidden.
At the bottom of the input page I have a button which then prints the workbook to a pdf. When it prints, it is only printing the visible worksheets, not the hidden ones.

I am attempting to figure out how to have page numbers appear on the bottom (footer) of the pages, but the page numbers need to start at 1 for the first VISIBLE worksheet and continue sequentially for all the VISIBLE worksheets so that the final pdf has page numbering that makes sense. My VBA "print to pdf" button hides the Input page so I don't have to worry about that being 'visible' when numbering.

Any thoughts?

[jolivanes]

Do you save the non hidden worksheets to a single PDF or a PDF for each visible sheet?
The first thing the code does is hide your "input" sheet and then print the visible sheets to PDF? That is the way it sounds.

[nimrod1313]

Please Login or Register  to view this content.

[jolivanes]

For individual pdf files, this should do that.

Please Login or Register  to view this content.

[jolivanes]

If you want it in a single PDF file, this would do that.
Change the "Whatever you want to name it" in the code to the name of your file.

Please Login or Register  to view this content.