Datum berechnen
17.11.2004 15:05:08
Roland
Ich habe folgenden Code aus der VBA-Hilfe etwas verändert. Das Ergebnis ist an sich richtig, wird aber als negative Zahl dargestellt. Wie bekomme ich nun eine Positive.
Sub Datum()
Dim Datum1 As Date
Dim Msg
Datum1 = [C5]
Range("C4") = DateDiff("yyyy", Now, Datum1)
End Sub
Kann mir bitte jemand helfen!
Grüße
Roland