ik probeer een userform te maken die verschillende excelblad doorzoekt. De gegevens die ik wil zoeken worden in een listbox geselecteerd.
De gegevens die ik doorzoek staan in een kolom en in elke cel kunnen gegevens staan die met kommas gescheiden worden. (model A, model B, modell USA, model Japan, model RoW) De listbox heeft alle modellen als keuze mogelijkheden.
Het probleem dat ik heb is dat als ik zoek met match dat er geev verschil is tussen de gegevens tussen kommas.
ik probeer nu find te gebruiken maar heb hetzelfde probeel.
Mijn code is:
For iListCount = 0 To ListBox2.ListCount - 1
RefString = ListBox2.List(iListCount)
With Worksheets("Memo").Range("Database").Cells(iRowNumber, 1)
Set C = .Find(RefString, , LookIn:=xlValues, LookAt:=xlPart, MatchCase:=True)
If Not C Is Nothing Then
FirstAddress = C.Address
Do
ListBox2.Selected(iListCount) = True
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> FirstAddress
End If
End With
Next iListCount
Wat kan ik doen om mijn probleem op te lossen?
Bedankt Sander