Dim rng as Range
Dim res as Variant
set rng = Range("B2:O2")
res = Application.Match("s",rng,0)
if not iserror(res) then
msgbox "s found at cell number " & res & " in range " & _
rng.Address(0,0) & " cell address is: " & rng(1,res).Address
Else
msgbox "s not found"
End If

--
Regards,
Tom Ogilvy

"Fargo Holiday" wrote in message
news:06cGb.443084$Dw6.1350369@attbi_s02...
Howdy,
I want to search a row, say from B2 to O2, for a cell containing an s and
get the position of that cell, preferably in a format of number of cells
from the left. I've looked into using .Find, but I haven't been able to
figure out a way to get the information that I want. Could any of you
point
me to an example involving this scenario, or give me some pointers?

Thanks a bunch,
Fargo