How to find more than one occurance on a search (SOLVED)

[phantom1975]

Here is a portion of code that I have:

On Error GoTo ErrorTrap
Select Case BtnSearch.Caption
Case "Click HERE to Search by Phone Number"
CustomerSearch = Application.Match(CDbl(TxtSearch.Value), Sheets("Client List").Range("Phone1"), 0)
Case "Click HERE to Search by Last Name"
CustomerSearch = Application.Match(CStr(TxtSearch.Value), Sheets("Client List").Range("Last"), 0)
Case "Click HERE to Search by Customer Number"
CustomerSearch = Application.Match(CStr(TxtSearch.Value), Sheets("Client List").Range("O3:O1100"), 0)
End Select

I guess that a FOR..NEXT would do the trick, but I just can't figure it out.

_________________
The only dumb question is the one that isn't asked. Pass on what you have learned.
This message was edited by phantom1975 on 2002-11-06 15:47