Geburtsjahre
19.09.2016 07:24:17
Jürgen
durch diesen Code ermittle ich wie Alt jemand ist.
TextBox4.Value = WorksheetFunction.RoundDown((Now() - CDate(TextBox3)) / 365, 0) & " Jahre"
text Box 3 gebe ich das Datum ein und Text Box4 kommen die Jahre heraus.
Irgendwie passt es beim 01.10.1969 nicht. Da kommt 47 Jahre heraus. Kann aber nicht sein, weil er immer noch 46 Jahre ist.
Wo liegt der Fehler?
Danke
Jürgen