One command, no looping required.

Application.WorksheetFunction.CountIf(Range(Cells( 42, 2),
Cells(77, 2)),"0")


-----Original Message-----
Hi
What code should I write in order to count only the
positive value of a
pre-defined range: Range(Cells(42, 2), Cells(77, 2))

Thanks
Pedro


.