Public Function DaysSinceZero( _
ByVal vYear As Variant _
, ByVal vMonth As Variant _
, ByVal vDay As Variant _
) As Variant DaysSinceZero(1999, 11, 12) = 730435
DaysSinceZero(1903, 12, 17) = 695406
DaysSinceZero(1776, 7, 4) = 648856See also: DayNumber Function
JulianDate Function
JulianDay FunctionvYear: Must use the full four-digit year; cannot use 96, for example, to mean 1996. Function returns Null if vYear is Null or cannot be interpreted as an integer number. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.