Welcome to the Tweaking4All community forums!
When participating, please keep the Forum Rules in mind!
Topics for particular software or systems: Start your topic link with the name of the application or system.
For example “MacOS X – Your question“, or “MS Word – Your Tip or Trick“.
Please note that switching to another language when reading a post will not bring you to the same post, in Dutch, as there is no translation for that post!
[Solved] VBA/MS Access - Determine age based on date of birth (DOB)
(@hans)
Famed Member Admin
Joined: 12 years ago
Posts: 2869
Topic starter
August 19, 2013 8:00 AM
Right after posting the trick fo MySQL on how to determine age, I bumped into this VBA function that does the same:
This function calculated age based on [Birthdate] and today (Date) and returns the answer in years.
Function Age (Birthdate as Date) as Integer
Age = DateDiff("yyyy", Birthdate, Date) + (Date < DateSerial(Year(Date), Month(Birthdate), Day(Birthdate)))
End Function