Find
11.08.2005 18:38:34
Heiko
Ich kämpfe schon einige Zeit mit folgendem Problem (das wie ich fürchte sich innerhalb max. 15 min lösen wird, und mich wieder etwas dumm aussehen lässt...):
Ich habe eine Spalte mit 4- und 7-stelligen Nummern.
über den Find-Befehl in VBA versuche ich nun die Zelle zu finden, die dem "Suchkriterium" entspricht.
Fehler:
Ich suche nach "5227".
Einige Zeilen vorher ist eine Zelle mit dem Inhalt "4522701".
Fälschlicherweise wird mir die erste Zelle als Ergebnis geliefert.
Was ist falsch, oder gibt es einen anderen Weg?
Mein Code:
Suchkriterium="5227"
With Worksheets("PL").Range("B:B")
Set Zelle = .Find(Suchkriterium, LookIn:=xlValues)
If Not Zelle Is Nothing Then
Zeile_PL = Zelle.Row
Bez1 = Worksheets("PL").Cells(Zeile_PL, 3)
End If
End With
Vielen Dank im Voraus!
Gruss, Heiko