Dim cell As Range
With ActiveSheet.Range("a1:a500")
Set cell = .Find(2, LookIn:=xlValues)
If Not cell Is Nothing Then
MsgBox cell.Row & " - " & cell.Column
End If
End With

--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)



wrote in message
...
On Jan 31, 12:33 pm, carlo wrote:
Sure.....but could you explain yourself a little bit better?

otherwise we have to guess here...

cheers
Carlo

On Jan 31, 1:27 pm, wrote:



if it possible to write a program that will return the Row/ column
number of the cells contain certain value?- Hide quoted text -

- Show quoted text

something like a search engine: a textbox and a search button.once key
in the value in the textbox and pressed "search", it will track the
data in the work sheet1 and return the column number and row number in
the other 2 TextBoxes.

_____________ (Search)


Column:______________
Row:_________________