Want to find out somebody's age in years.

CalculateAge = DateDiff("yyyy", dat, Now)

The above almost works except that a new year is starting on 1st jan and not on their birthday.

Any ideas?