Hey thanks guys for all the participation, this really is a great board!
I did'nt quite understand what you were saying before when you were trying to help me, sorry!
here's my function as it is now. Have I fxed what you were talking about?
Code:
Public Function InColumnn(strSearch As String, r As Range) As Boolean
Dim c As Range
Dim result As Boolean
Set c = r.Find(strSearch, , xlValues, xlWhole)
If c Is Nothing Then
result = False
'InColumn = False ' this makes Excel unhappy
Else
result = True
InCoulumn = True ' whereas this does not...
End If
End Function