Age Based on Date

[DavidPuddyFan]

Trying to find the expression that would give me the age of a person
based on a specfic date, say 10/01/03...right now Im using this
expression to get age, but need to change it to age on the date above:

Age: Int(DateDiff("y",[BirthDate],Now())/365.237)

Thanks in advance

 

[fofa]

you need to substitute the Now() with your date:
Age: Int(DateDiff("y",[BirthDate],Now())/365.237)
How you want to do this is your choice, but if in a query you can use
the [ENTER Date Age AS OF] and it will pop up a box to ask. If in VBA
or a form you can just reference a form field or variable instead.
Query - Age: Int(DateDiff("y",[BirthDate],[ENTER Date Age AS
OF])/365.237)

 

[fofa]

you need to substitute the Now() with your date:
Age: Int(DateDiff("y",[BirthDate],Now())/365.237)
How you want to do this is your choice, but if in a query you can use
the [ENTER Date Age AS OF] and it will pop up a box to ask. If in VBA
or a form you can just reference a form field or variable instead.
Query - Age: Int(DateDiff("y",[BirthDate],[ENTER Date Age AS
OF])/365.237)

 

[Guest]

An even simpler way

Age: Year(Now())-Year([BirthDate]

Hope this helps

 

[Duane Hookom]

Oooops! I'm not quite 50 yet but your calculation adds months to my age
before I am ready ;-)
None of the "divide the number of days between by 365.xxx" is 100% accurate.