VBA - Suchfunktion
08.02.2015 12:27:00
Tobias
kurze Frage zur .Find Funktion.
Ein Ausschnitt des Codes:
For i=1 To 25
s=Cells(i+4,1).Value
Set C = Rows("1:1000").Find(s)
If C Is Nothing Then
Else
Zeile=.Row
End If
Next i
In der Spalte A finden sich verschiedene Zahlenfolgen wie bspw 123456.
Jetzt kann es aber passieren, dass diese Zahlenfolge in der zu durchsuchenden Matrix mit einer anderen Zahlenfolge in einer Zelle steht: Bspw: 123456 / 654321. Leider schaut der Code ja nur ob die Zelle genau dem Suchwert entspricht, also findet er den Zahlencode 123456 nicht, weil dieser mit dem Zahlencode 654321 in einer Zelle steht.
Bei der Formel könnte ich dass ja mit Sternen versehen =WENN(A6="*123456*";"x";""). Dann findet er den Zahlencode. Wie geht das bei VBA?
Besten Dank!
Tobi