version=1.0.2
vdate=19.10.2015
fname=cast_numtodate.bas
ns=%NAMESPACE%
fpath=/vba/cast
====== [VBA] numToDate() ======
//Wandelt eine Zahl (auch Unixtimestamps) in ein Datum.//
==Version %%version%% - %%vdate%%==
{{%%fname%%|Download %%fname%% (V-%%version%%)}}
===== Beispiele =====
> Für die Ausgabe der Resultate verwendete ich die Funktion [[:vba:functions:print_r:]].
'Ein Unix-Timestamp (1970)
d numToDate(1446460704,,ntdUnixTimestamp)
02.11.2015 10:38:24
'Tage seit dem Microsoft-Null (1900)
d numToDate(52158, "d")
19.10.2042
===== Code =====