Maybe

for i=65 to 1261 step 52
if range("F" & i)<0 then
set print range to rows (i, i+51)
printout
end if
next i

"Gerard Sanchez" wrote in message
...
Hi,

Each worksheet has 25 pages in it.
Some have values some don't.

I was wondering if anybody cen help me with a Module Level Macro
that lets me print pages provided a cell on that page is not equal to zero
(0)

Here it is:

Print page two if F65 < 0
Print page three if F117 < 0
Print page four if F169 < 0
Print page five if F221 < 0

and on . . . until page 25 if cell F1261 < 0

(pattern is every 52 cells beginning with F65 and ending with F1261)

Anybody??