Hallo Leute,
hab da mal wieder ein problem.
Ich hab in einer Tabelle(Daten) in Spalte A verschiedene Datumseinträge.
Jetzt möchte ich per vba mit folgendem Makro einen den ersten Tag im Monat suchen.
Klappt auch wenn wenn der Monat vorhanden ist.
Bsp. in der Liste steht der 06.11.2012, wenn ich einen Monat auswähle vor November
klappt es auch und er sagt a=nothing.
Wenn ich aber Dezember auswähle nimmt er den 06.11.2012.
Kann vllt. jemand den fehler in meinem code finden?
Datum = DateSerial(Sheets("Admin").Cells(4, 2), Sheets("Admin").Cells(5, 2), 1)
With Sheets("daten").Range("a3:a200000")
Set a = .Find(Month(Datum), LookIn:=xlValues)
If Not a Is Nothing Then
End If
End With
Vielen Dank im vorraus