Counting Cells

  • Thread starter Thread starter Pedro Marques
  • Start date Start date
P

Pedro Marques

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
 
Total = 0

For J = 42 to 77

If Cells(J, 2).Value > 0 Then

Total = Total + Cells(J, 2).Value

Next J
 
Thinking about it if you only want to count the number of
cells rather than sum them you should use

application.worksheetfunction.countif
 
Thanks Nick

I tried to use the application.worksheetfunction.countif

Using strRet = Application.WorksheetFunction.CountIf((Range(Cells(42, 2),
Cells(77, 2))), Cells.Value > 0)

But it gives me an error.

Do you know what do I have to change?
 
One command, no looping required.

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