Date to Age

[Mary M]

How can you convert a date dd/mm/yyyy to an age? ie. If a table has a
birthdate field I would like to just display the Age on a form and not the
date.

Many thanks in advance for any assistance.

 

[Guest]

Mary,

See the following link:

http://www.mvps.org/access/datetime/date0001.htm

Sprinks

 

[Guest]

=DateDiff("yyyy", [Insert Date of Birth], Now())+ Int( Format(now(), "mmdd")
< Format( [Insert Date of Birth], "mmdd") )

 

[Mary M]

Thanks,

How would I be able to put this on a form so that it will display the
calculated age for each record the value will change for each record?

Thanks again.l

=DateDiff("yyyy", [Insert Date of Birth], Now())+ Int( Format(now(),
"mmdd")
< Format( [Insert Date of Birth], "mmdd") )

How can you convert a date dd/mm/yyyy to an age? ie. If a table has a
birthdate field I would like to just display the Age on a form and not
the
date.

Many thanks in advance for any assistance.

 

[Steve Schapel]

Mary,

You can put an unbound textbox on the Detail section of the form.
Assuming your BirthDate field is in the form's Record Source
table/query, you can use the expression given by Wayne in the Control
Source property of the textbox, and it should show the Age for each
record in the form. Well, something like Wayne's expression... I would
slightly simplify it, and debug it, like this...
Age:
DateDiff("yyyy",[BirthDate],Date())+(Format([BirthDate],"mmdd")>Format(Date(),"mmdd"))