Macro: Print Sheets If Used

I'm in the process of placing a button on sheet#1 that will print any of the 5 sheets in the workbook that have been used... a sheets use is determined by cell I53 being > 0...

I've initially used this code to test I53, but it shows all sheets, regardless of I53 value...


Sub PrntUsedShts()
Dim ws As Worksheet

For Each ws In Worksheets
If Range("I53").Value > 0 Then
ws.PrintPreview
End If
Next ws
End Sub




Ideally, the finished code will send all selected sheets collated as a single print job...
Should I be looking at putting test positive sheets into a sheet array?, then printing the sheet array?

Once again, your valued input is greatly appreciated...