Creating a search button/macro..google style..

[nixis00]

Hallo guys,

I have a set of raw data to work with:

I'd like to know any functions/macros to buld some sort of 'searc
engine' that coud direct me to the data..

e.g.
sheet 1 raw data:

a b c d
1 a1 b1 c1 d1
2 a2 b2 c2 d2
3 ... ... ... ...
4 ... ... ... ...


sheet 2 search:
search box/button/etc

search:_a1__________ enter

result:
a
1 *a1*



I hope you understand what I need, is not a very simple task..

 

[jeff]

Hi,

If your data is in A1:C10, (adjust this macro to fit)
paste this code. It returns the address on sheet1
of the value you key in sheet2 cell B3 to B5.

Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
SrcVAl = Range("B3")
findval = Sheet1.Range("A1:C10").Find(SrcVAl).Address
Sheet2.Range("B5:B5") = findval
End Sub

jeff