Code:

For each C in Range1
Call FindMe(C)
Next For

Sub FindMe(Cel as Range)

....

End Sub

Apparently, the C in the For statement won't get passed on to the FindMe Sub
as a Range variable. I have to use Sub FindMe(Cel) without the "as Range" for
this to work. Why is the C not a Range variable? I can do C.address and it
returns a Cell address.