Public Function AgeDifference( _
ByVal vFromDate As Variant _
, ByVal vToDate As Variant _
, Optional ByVal vCountTime As Variant _
) As Variant AgeDifference(#1/1/70#, #1/1/96#) = 26
AgeDifference(#1/1/70#, #5/1/96#) = 26
AgeDifference(#9/1/70#, #5/1/96#) = 25
AgeDifference(#1/1/70 9:00#, #1/1/96 5:00#) = 26
AgeDifference(#1/1/70 9:00#, #1/1/96 5:00#, True) = 25See also: AddBusinessDays FunctionvFromDate: The earlier of the two dates for which the difference in years will be calculated. Function returns Null if vFromDate is Null or cannot be fixed up to a Date.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.