Woher nimmt Excel (VBA) sein Datum?

... komplette Frage anzeigen

2 Antworten

Sehr seltsam.
Vielleicht hilft Dir das "auf die Sprünge":
SO kann ich nämlich die 1899 generieren:

Sub test()
Dim datum As String
datum = Range("A1")
Debug.Print Year(datum)
End Sub

Wenn in A1 jetzt eine 0 oder eine 1 steht - und nur dann - wird 1899 ausgegeben.
Year(Date) müsste aber unbedingt das aktuelle Jahr ausgeben.

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von Oubyi
23.06.2016, 09:31

Danke fürs

0

Versuch mal kurz Dir das aktuelle Datum, ausgeben zu lassen mittels

Sub Main()

Debug.Print Date

End Sub

Was spuckt es Dir da aus?

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von Oubyi
16.06.2016, 13:55

... und vlt. auch nochmal:
Debug.Print Year(Date)
Und zeige mal, wie die Variable "datum" erstellt wird und ob in der Zelle ein Text oder ein echtes Datum steht.

1

Was möchtest Du wissen?