VBA Excel Print every Odd WorkSheet within A WorkBook

Hi All,
I am looking for a code which will print every odd worksheet within a workbook, there are currently 200+ sheets within the book and this is likely to increase as time goes on.

Each worksheet has an individual name, and the page which needs printed ends in "Invoice". I thought I had solved it by looking for the text value "Company" within Cell A12 of a sheet, if it was present then print that sheet and move on, however this did not work either.

Any help would be appreciated.

Thanks,
Daniel

Use PrintPreview until you are sure of results.....saves paper

Please Login or Register  to view this content.

Originally Posted by dominicb

Good afternoon DTK0902

Untested, as I don't want to print hundreds of sheets out, but something like this should be OK :

Please Login or Register  to view this content.

This purely looks for every other sheet, starting at the first, using index numbers - it makes no difference what the sheets are named.

HTH

DominicB

DominicB - Thank you! That works perfectly.


Thanks,
Daniel