You could set up a variable just for keeping count.
Dim counter as integer
counter = 0
'put the If/Then statement in a loop to check the rows

If rowvalue =45 OR rowvalue <=50 then
counter = counter + 1
End If

HTH