I have 18 Check Boxes. I am using this code below and it does print, but I noticed if one sheet has a lot more data or photos than another it takes a longer to send to printer and in turn causes it to lag behind, at which it causes it to fall out of order. Is there a way to keep it in numeral order.
Code: Select all
If CheckBox1.Value = True Then
Worksheets("Cover Page").Visible = xlSheetVisible
Worksheets("Cover Page").Select
Range("A1:AM105").PrintOut Copies:=1, Collate:=True
Worksheets("Cover Page").Visible = xlSheetHidden
End If