Jörg Lorenz: Excel - Datumsformat

Beitrag lesen

Hi Alfie,

Schau dir doch einmal diese Nachricht in der Excel Discussion Group an.

Vielleicht später mal ;-)

Aus dem 29.1.2005 wird der 29.2.2005, dieses Datum gibt es nicht. In seiner unendlichen Weisheit verwendet Excel daher ein 'plausibles' Monat - und das ist der März ;-)

Ja, das aber inkonsequent.

Ich habe mal auf die Schnelle was gebastelt, das aber nur eine Grundlage sein kann:

Function xyz(x As Date) As Date
Application.Volatile
a = Day(x): b = Month(x): c = Year(x)
If b = 12 Then
    b = 1: c = c + 1
Else
    b = b + 1
End If
d = CDate(a & "." & b & "." & c)
If Year(d) > Year(x) + 1 Then xyz = "" Else xyz = d
End Function

Das ist aber ungetestet und müßte noch etwas verfeinert werden.

In die Zelle könnte man dann z. B. schreiben:

=WENN(ISTFEHLER(xyz(A2));"";xyz(A2))

Oder so ähnlich.

Viele Grüße

Jörg