having created a great excel form in which the last piece was a [fm]*[/fm] and find next, ( having used the basics which i found on the net) , i don't have the ability to re-work this part of the find so that multiple cases of the same iteem can be found.
can any one suggest how this can be changed.
'######################################
Code
Private Sub cmdFind_Click()
Dim lCol As Long
Dim rFound As Range
' # Which column to search - add one because ListIndex starts at zero
lCol = Me.cbxFind.ListIndex + 1
'#Find the first cell that contains the textbox text. I use xlPart
'#to search for partial data, but this could cause problems.
Set rFound = Sheet1.Columns(lCol).Find(what:=Me.tbxFind.Text, LookIn:=xlValues, LookAt:=xlPart)
'#If a match was found, change the scrollbar to that record
'#otherwise show a new record
If Not rFound Is Nothing Then
Me.scbContact.Value = rFound.Row - 1
Else
Me.scbContact.Value = Me.scbContact.Max
End If
End Sub
Display More
this works on a combo box for the list and the resultant answer from an input to a listbox to move the scroll bars on a form to the correct found answer.
in some cases there can be more than one result, how do i get it to find NEXT. can any one help