Alternate printing sheets

Hello, I have the below VBA that prints 4 sheets of each and on each sheet it changes the date by 1 day. How would the code go if I wanted to print 1 Spot Check sheet and then 1 Pallet Check sheet then change the date +1 and loop this 4 times?

Please Login or Register  to view this content.

Try;

Please Login or Register  to view this content.