Page 1 of 1
Forum

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!



VBA/MS Access - Det...
 
Share:
Notifications
Clear all

[Solved] VBA/MS Access - Determine age based on date of birth (DOB)

1 Posts
1 Users
0 Reactions
1,839 Views
 Hans
(@hans)
Famed Member Admin
Joined: 12 years ago
Posts: 2869
Topic starter  

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

   
ReplyQuote
Share: