Sub iamthecount()
For Each r In Range("SOURCE")
If r.Value < "ABCD" Then
i = i + 1
End If
Next
MsgBox (i)
End Sub

will count the cells that do not equal ABCD
--
Gary''s Student - gsnu200756


"JoeMNY" wrote:

Thanks
Is there VB code I could use instead as there are quite a few ranges.

"Gary''s Student" wrote:

Not your problem. COUNTIF works on contiguous ranges only.

The usual workaround is to add up the contiguous pieces:

=COUNTIF() + COUNTIF() + etc.
--
Gary''s Student - gsnu200756


"JoeMNY" wrote:

I have a range (SOURCE) that consists of non-contiguous cells in a column
(eg. ='Log Sheet'!$O$61:$O$110,'Log Sheet'!$O$125:$O$174,'Log
Sheet'!$O$189:$O$238,'Log Sheet'!$O$253:$O$302,'Log Sheet'!$O$317:$O$366,'Log
Sheet'!$O$381:$O$430). When I use the range in a formula
(=COUNTIF(SOURCE,"<ABCD") it returns the #VALUE error. What am I doing
wrong?

TIA
Joe