Clever-Excel-Forum

Hallo zusammen,

ich komme aktuell nicht weiter.
Ich suche einen Wert (immer Zahlen) in einer bestimmten Range, den Wert selbst finde ich auch, würde aber gerne die Zeile ermitteln.

Code:
    Dim findRange As Range

    Dim foundRng As Range

    Set ws = Sheets("Tabelle1")

    Set findrange = ws.Range("A7:A9837")

    Set foundRng = findrange.Find(TextBox18.Value)

Also ich kann zumindest mit einer If-Abfrage überprüfen, ob der Wert gefunden wurde. Aber bekomme es nicht hin, dass er mir die Zeile ausgibt.

Beste Grüße

Moin!
foundrange.row

Allerdings solltest Du beachten, dass die Range.Find-Methode (optionale) Parameter hat, die intern auf den letzten benutzen Wert gespeichert werden.
Siehe die VBA-Hilfe:

Zitat:Die Einstellungen für LookIn, LookAt, SearchOrder und MatchByte werden gespeichert, sobald Sie diese Methode verwenden. Wenn Sie keine Werte für diese Argumente angeben, werden das nächste Mal, wenn Sie die Methode aufrufen, die gespeicherten Werte verwendet.

Zumindest der zweite ist sehr wichtig!

Gruß Ralf

Und noch ein Zusatz:
Wenn Du nur in einer Spalte suchst, kannst Du eher Worsheetfunction.Match nehmen.
Das gibt Dir direkt die Zeile zurück.
https://docs.microsoft.com/de-de/office/...6rd%3Dtrue

Korain

RPP63