Creating a Search Cell

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a customer list in column 1 from a4 to a500. I want to be able to in
a1 type some letters and the customer corresponding to the letters i am
typing in comes up. Exactly like a search engine for excel. Any help on
this?
 
Until something better comes along, you might consider just highlighting
column A and using the Edit > Find, procedure..


Vaya con Dios,
Chuck, CABGx3
 
Right click on the tab of the sheet that you want this functionality
added to and select View Code. Paste in the code below.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Columns(1).Find(What:=Target.Text & "*", After:=Range("A3"), _
LookIn:=xlFormulas, LookAt:=xlWhole, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
End If
End Sub
 
Not quite the same, but maybe you could apply Data|Filter|autofilter to column
A.

Then you could use the dropdown to do a custom filter:
begins with
ends with
contains
to find all the matching entries.
 
Back
Top