Sheet And Cell Reference

I have an IF statment that looks at a sheet but I would like it to look at certain sheets I.E. sheet 2,4,5,6.

Sub SelectPrintArea2()
For Each ws In Worksheets
If Range("Sheet4Q5").Value > 0 Then
Range("A1:AA47").Select
ws.PageSetup.PrintArea = "$A$1:$AA$47"
ElseIf Range("C5").Value > 0 Then
Range("A1:M47").Select
ws.PageSetup.PrintArea = "$A$1:$M$47"
End If
Next ws
End Sub

But it will only look at the sheet it is in and not any of the other sheets. I've tried to tell it which sheets but I just get errors.