I'm currently using the following code (inside a much larger code) to print all worksheets that are named with a 5-digit code ....
For Each ws In ThisWorkbook.Worksheets If ws.Name Like "#####" Then
ws.Range("P22:U22").Font.Color = vbWhite
ws.Range("P22:U22").Interior.Color...