Hallo,
ich würde gerne die Zelle H2 überprüfen lassen ob das Datum auf dem Kalender sich befindet.
z.B. so:
If IsDate(Tabelle3.Range("H2").Value) = nicht auf dem deutschen kalender Then
MsgBox ("Das Datum existiert nicht, oder der Monat hat nicht so viele Tage")
Exit Sub
End If
wenn in H2 z.B. der 01.01.2020 steht soll das Makro einfach weiterlaufen.
wenn z.B. der 31.06.2020 steht soll die Fehlermeldung kommen weil der Monat hat nur 30 Tage.
Gruß
Torsten
|