Hallo zusammen,
ich habe in einer Excel-Datei in der Spalte A, ab Zeile 4 eine Reihe von Datumsangaben, fortlaufend nach unten.
Mit:
Dim SearchFor As Range
Set SearchFor = Worksheets("Tabelle1").Columns(1).Find(Date, Lookat:=xlWhole)
suche ich nach dem heutigen Datum und das klappt auch gut, wenn in dieser Spalte das heutige Datum steht. Steht das nicht drin kommt ein Fehler, in dem Fall bräuchte ich das nächst kleinere Datum - also z.B. wenn der 04.10 (Heute) nicht gefunden wird, dann nehmen wir den 03.10 (in der Tabelle vorhanden).
Kann mir da jemand helfen?
Eine Formel würde mir nichts nützen, weil ich mit dem gefundenen Wert weiterarbeiten möchte.
Viele Grüße und Danke
Aaron