Many thanks Don - I did look in Find but wasn't bright enough to realise I
should put .Row at the end.

How you MVPs put up with people like me I do not know - it is a fantastic
service - perhaps in my small way I do the same thing at a much lower level
when my club members ask me such things as why do they keep loosing
everything when, in Word, they type a uppercase A (they press CTRL instead
of shift and then over type everything!

Thanks

Francis

"Don Guillett" wrote in message
...
Perhaps a look in the vba help index for FIND would have been of
assistance.
This finds if that is the only thing in the cell ( you did not specify)
Sub zTest()

sdname = "D01-007"

'iDRow = .Find(sDName, LookIn:=Range(Cells(6, 2), Cells(30, 2))).Row

x = Range(Cells(6, 2), Cells(30, 2)).Find(sdname).Row
MsgBox x
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Francis Hookham" wrote in message
...
I am trying to find the row in which a string occurs but I just do not
understand how.
Can you complete this for me?

Sub zTest()

sDName = "D01-007"

iDRow = .Find(sDName, LookIn:=Range(Cells(6, 2), Cells(30, 2)))

End Sub

Francis Hookham