jerry0110
Erfahrenes Mitglied
Hallo zusammen,
ich habe eine Liste mit Namen und Geburtsdaten.
Ich mache mit einer Schleife eine Abfrage wo die einzelnen Geburtsdaten sucht.
Und wenn heute jemand Geburtstag hat, dann soll er eine Mail erstellen.
Das macht er auch, wenn ich z. B. das heutige Datum nehme.
Aber die Leute haben ja nicht in im Jahr 2018 Geburtstag sondern z. B. 1978.
Jetzt möchte ich mit einer If Abfrage das nur das heutige Datum (Tag und Monat) suchen und dann wenn es vorhanden ist, eine Email erstellen.
Habe mal meine Versuche alle drin gelassen. Bei der letzten "aktiven" Abfrage, sagt er am Schluss das der Typ unverträglich ist. Aber auch nur, weil er dann bei der Überschrift ist.
ich habe eine Liste mit Namen und Geburtsdaten.
Ich mache mit einer Schleife eine Abfrage wo die einzelnen Geburtsdaten sucht.
Und wenn heute jemand Geburtstag hat, dann soll er eine Mail erstellen.
Das macht er auch, wenn ich z. B. das heutige Datum nehme.
Aber die Leute haben ja nicht in im Jahr 2018 Geburtstag sondern z. B. 1978.
Jetzt möchte ich mit einer If Abfrage das nur das heutige Datum (Tag und Monat) suchen und dann wenn es vorhanden ist, eine Email erstellen.
Code:
For f = lastRowNr(source) To 1 Step -1
'If source.Range("C" & f) = Month(Date) And source.Range("C" & f) = Day(Date) Then
'If DateDiff("d", Date, DateSerial(Year(Date), Month(source.Range("C" & f)), Day(source.Range("C" & f)))) Then
If CDate(source.Range("C" & f)) = Month(Datum) And CDate(source.Range("C" & f)) = Day(Datum) Then
Habe mal meine Versuche alle drin gelassen. Bei der letzten "aktiven" Abfrage, sagt er am Schluss das der Typ unverträglich ist. Aber auch nur, weil er dann bei der Überschrift ist.