Hallo liebes Forum,
habe ein Code, womit ich meine Tabelle durchsuchen kann. Brauche allerdings eine Möglichkeit mit einer Schleife alle möglichen Ergebnisse zurückzugeben. Wie könnte der Ansatz sein?
With ThisWorkbook.Worksheets(1).Range("v1:v500")
Set c = .Find(Trim(Uebergabe), LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address(0, 0)
Else:
MsgBox "Das Konto " & Uebergabe & " wurde nicht gefunden!"
Application.DisplayAlerts = True
Exit Sub
End If
End With
Dank und Gruss
ticonhh