auf einem Excelblatt suche ich mit folgendem VBA einen bestimmten Wert der im Vorfeld mit i definiert wurde. Wenn die suchfunktion nichts findet sollte der nächst Datenstatz gesucht werden. Warum erhalte ich aber wenn er nichts findet immer eine Fehlermeldung?
Selection.Find(What:=i, After:=ActiveCell, _
LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext, MatchCase:=False).Select
Set found = Selection.Find(suchstring)
While Not found Is Nothing
found.nächste_Zelle
Set found = Selection.FindNext()
Wend
Danke und Gruss
Dani