Print Certain Worksheets Based On Cell Value In Each

I started a similar thread recently but I've had to change up my workbook so I'm now having an issue getting my print function to work correctly.

My workbook has 150 tabs or sheets. I want to assign a macro to print all sheets in the workbook that have a certain value in a particular cell of each sheet.

In cell $AD$4 of each sheet, it will have "Print" or "NoPrint"
If it has "Print", I want the sheet to print.
If it has "NoPrint" I do not want the sheet to print.

Here is the code that I'm trying to use but I'm getting a debug error.

Can anyone offer a solution?

Please Login or Register  to view this content.

Originally Posted by mehmetcik

Please Login or Register  to view this content.

Thanks for assisting! I'm getting the following error using that code.

Attachment 650691

Originally Posted by mehmetcik

Welcome to the forum

Please attach a sample workbook...

Sorry... I've removed 145 tabs and made a small test version with only a handful of tabs instead. I've attached it here for you. In this example, only two sheets should print. Employee1 and Employee2

Originally Posted by mehmetcik

Please Login or Register  to view this content.

Mehmetcik - I'm not sure how you and the others on this website, that help people like myself, know how to write code like this. It's truly amazing for a novice like myself. Thank you so much for the assistance!

Originally Posted by mehmetcik

Please Login or Register  to view this content.

Mehmetcik - Sorry but I had to open this back up. The macro is not behaving properly. If looking at my example that I attached for you already, I inputted 3 employee names. It will print 1, 2 & 3, then print 3 again, skip 2 and print 1 again. If I enter an employee1 and an employee 3, it will print 1, then 3, 3 again and 1 again last.

Originally Posted by mehmetcik

Very strange behavior

Let me annotate the macro to see what is happening.

Ok I cannot see anything wrong with the Macro.
Perhaps you have set a page to print twice. The macro should overwrite that. But excel does funny things at times....

I definitely don't have any to print twice. I made the first sheet and copied it over and over. The print area was set from the start to 1 page wide and x 1 page tall. I opened the file in my Citrix environment versus my local environment (laptop) and got the same result.