VBA for print if cell contains, then choose printer. Have code just need advice.

Originally Posted by JBeaucaire

I fear you are not reading these macros carefully and absorbing what they are doing and when/how.

Fair comment!

I tried:

Sub PrintSheetsJbeau()
    
    Dim i               As Long
    Dim sSheetNames()   As String
    Dim ws              As Worksheet

    Application.Dialogs(xlDialogPrinterSetup).Show
  For Each ws In ActiveWorkbook.Worksheets
           If UCase(ws.Range("E1")) = "YES" Then
            ws.PageSetup.CenterHeader = ws.Range("A2").Value
                Sheets(sSheetNames).Select

            ws.PrintOut
        End If

    Next ws

End Sub

I am still very new to VB (one week!), I'm stuggling to identify what line of code in vfxd's groups it into one print job?