Hi Buntykins,
I can't help but feel a little strange typing that & yuo're not my wife :wink:
Anyway - try this :
Sub Macro1()
Range("a1:a10").Select
myran = Selection.Find(What:="lewis", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Row
Range("d1").Value = myran
End Sub
This looks for "Lewis" in A1 to A10 & returns the row number in cell D1
HTH,
Iain