iopdiamond.blogg.se

If these arguments have time portions, the time portions ' are ignored. This function may be used in any VBA or VB project ' Date1 and Date2 must either be dates, or strings that can be implicitly ' converted to dates. ' This function returns a string "X years, Y months, Z days" showing the time ' between two dates. This function with equivalent settings returns:įunction YearsMonthsDays(Date1 As Date, Date2 As Date, Optional ShowAll As _īoolean = False, Optional Grammar As Boolean = True) This function is an alternative to the VB/VBA function DateDiff, which does not measure full months or full years, and to the not-well-known Excel function DATEDIF, which usually works well, but can give unexpected results near a month end. This function returns a string with the elapsed time between two dates in such terms. This is most often the case with ages, especially in terms of records for the youngest or oldest person to have accomplished a particular feat. Sometimes, people like to express the elapsed time between two dates interms of full years, months, and days. This function may be used in any VBA or VB project (as well as Excel worksheet formulas or Access forms, queries, and reports) to return an "aging" string of full years, months, and days elapsed between two dates Function to return whole years, months, and days between two dates