Create Loop for Printing Reports

My suggestion:
Use the last 347 columns on the sheet as a row selection matrix. The first column would correspond to Report #1 and each row in the column would have a 1 if that row is to be hidden for that particular report.
For instance column "WRV" i.e. #16038, would have a 1 in rows: 23, 24, 33 & 38. Then all you need is a loop counting from 1 to 347 that puts the count # in A3 and un-hides all rows, then re-hides only the rows with a 1 for that particular report.

Sub PrtAll()

    Dim ReportNumber    As Long, _
        RowNumber       As Long
    
    For ReportNumber = 1 To 347
         Cells.Select
         Selection.EntireRow.Hidden = False

        For RowNumber = 1 To 98
            If Cells(RowNumber, ReportNumber+16037) = 1 Then
                Cells(RowNumber, ReportNumber+16037).EntireRow.Hidden = True
            End If
        Next RowNumber
        Range("A3").Value = ReportNumber
        ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Next ReportNumber
End Sub 'prtall

1. The line: Range("A3").Value = ReportNumber, updates A3 for each report.
2. I only put in the Unhide code because I didn't know if the lines that were hidden in a particular report should remain hidden for all subsequent reports. If it is true that once a line is hidden, it remains hidden for all subsequent reports, then you don't need the unhide code.
===================================

@Partisano:
Welcome to the Forum, unfortunately:

Your post does not comply with Rule 2 of our Forum RULES. Don't post a question in the thread of another member -- start your own thread. If you feel it's particularly relevant, provide a link to the other thread. It makes sense to have a new thread for your question because a thread with numerous replies can be off putting & difficult to pick out relevant replies.

:@shahmurtaza, You could not but see the post just above yours. You ignored it!


Your post does not comply with Rule 2 of our Forum RULES. Don't post a question in the thread of another member -- start your own thread. If you feel it's particularly relevant, provide a link to the other thread. It makes sense to have a new thread for your question because a thread with numerous replies can be off putting & difficult to pick out relevant replies.

If you don't intend to abide by the rules, then why post at all?

Thanks protonleah,

others please read the rules and open your own threads and I will give infraction to those that continue spamming tjandas topic.