Получение или расчёт возраста по дате рождения в Excel

Если у вас на листе Excel есть список дат рождения сотрудников и вы хотите рассчитать их возраст, воспользуйтесь удобными функциями Excel — такими как YEARFRAC или DATEDIF: они позволят быстро и легко определить возраст по дате рождения.

• Рассчитайте возраст на основе Дата рождения с помощью функции YEARFRAC
• Рассчитайте возраст на основе Дата рождения с помощью функции DATEDIF
• Рассчитайте возраст на основе Дата рождения в годах, месяцах и днях
• Рассчитайте возраст на определённую дату в Excel
• Рассчитайте возраст на основе даты рождения до 1900
• Рассчитайте возраст на основе даты рождения от текущей или определённой даты с помощью удивительной функции

Рассчитайте возраст на основе Дата рождения с помощью функции YEARFRAC

В Excel функция YEARFRAC поможет вам рассчитать возраст на основе указанной даты рождения. Общий синтаксис:

• birthdateДата рождения.
• TODAY(): Эта функция возвращает текущую дату.

Поэтому введите приведённую ниже формулу в пустую ячейку:

Затем перетащите маркер заполнения вниз по ячейкам, к которым следует применить эту формулу. Все возрасты будут автоматически рассчитаны и отображены в виде десятичных чисел — см. скриншот:

Совет: результат расчёта функции YEARFRAC отображается в виде десятичного числа. Чтобы получить целое значение возраста, воспользуйтесь функцией INT следующим образом:

И вы получите возраст в виде целых чисел:

Рассчитайте возраст на основе Дата рождения с помощью функции DATEDIF

Функция DATEDIF также позволяет легко преобразовать дату рождения в возраст. Общий синтаксис:

• birthdate: Дата рождения.
• TODAY(): Эта функция возвращает сегодняшнюю дату.
• y: Возвращает количество полных лет между датой рождения и текущей датой.

Теперь введите или скопируйте следующую формулу в пустую ячейку:

И все возрасты будут автоматически рассчитаны на основе даты рождения — см. скриншот:

Рассчитайте возраст на основе Дата рождения в годах, месяцах и днях

Если вы хотите получить точный возраст человека — сколько лет, месяцев и дней прошло с его даты рождения до текущей даты, — объедините функции DATEDIF в одну формулу следующим образом:

И вы получите результаты, как показано на скриншоте ниже:

Совет: если вы хотите игнорировать нулевые значения лет, месяцев или дней при использовании приведённой выше формулы, добавьте функцию ЕСЛИ для проверки на 0. Воспользуйтесь следующей формулой:

И вы получите результат, как показано на скриншоте ниже: возраст отображается в годах, месяцах и днях без нулевых значений.

Рассчитайте возраст на определённую дату в Excel

Иногда требуется рассчитать возраст от даты рождения до определённой даты, а не до текущей. В этом случае во втором аргументе укажите нужную дату вместо функции TODAY(). Например:

• birthdate: Дата рождения.
• specific_dateКонечная дата, на которую вы хотите рассчитать возраст по дате рождения.
• y: Возвращает количество полных лет от даты рождения до текущей даты.

Используйте следующую формулу:

И возраст будет рассчитан от даты рождения до указанной даты, как показано на скриншоте ниже:

Совет: чтобы получить точное количество лет, месяцев и дней возраста, используйте приведённую ниже формулу:

Calculate age based on the birth of date before 1900

Приведённые выше формулы работают некорректно, если дата рождения указана до 1900 года, поскольку Excel автоматически сохраняет такие даты в текстовом формате. В этом случае на помощь придёт пользовательская функция (UDF), которая позволяет точно рассчитать возраст даже при дате рождения ранее 1900 года.

1. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. Затем нажмите Вставка > Модуль и скопируйте следующий код VBA в окно модуля.

Рассчитайте возраст от даты рождения до сегодняшнего дня, если дата рождения до 1900:

Function AgelnNow(ByVal xDate As Variant)
Dim xIA As Integer
xIA = 0
On Error Resume Next
xIA = DateDiff("yyyy", xDate, Now())
If (Month(Now()) < Month(xDate)) Or (Month(xDate) = Month(Now())) Then
If (Day(Now()) < Day(xDate)) Then
xIA = xIA - 1
End If
End If
If xIA = -1 Then
AgelnNow = "Error"
Else
AgelnNow = xIA
End If
End Function

3. Затем введите следующую формулу в пустую ячейку: =AgelnNow(A2) (A2 — ячейка с датой рождения)

Затем перетащите маркер заполнения вниз по ячейкам, чтобы автоматически рассчитать возраст на сегодняшний день для каждой даты рождения — см. скриншот:

Совет: если вам нужно рассчитать возраст от даты рождения до даты смерти вместо текущей даты, используйте приведённый ниже код:

Рассчитайте возраст от даты рождения до даты смерти, если дата рождения до 1900:

Function Age(ByVal StartDate As Variant, ByVal EndDate As Variant)
    Dim xIA As Integer
    xIA = 0
    On Error Resume Next
    xIA = DateDiff("yyyy", StartDate, EndDate)
    If (Month(EndDate) < Month(StartDate)) Or (Month(StartDate) = Month(EndDate)) Then
        If (Day(EndDate) < Day(StartDate)) Then
            xIA = xIA - 1
        End If
    End If
    If xIA = -1 Then
       Age = "Error"
    Else
        Age = xIA
    End If
End Function

И используйте следующую формулу:=Age(A2,B2)(A2— ячейка с датой рождения, а B2— ячейка с датой смерти), чтобы получить результат, как показано на скриншоте ниже:

Рассчитайте возраст на основе даты рождения от текущей или определённой даты с помощью удивительной функции

Используемые связанные функции:

Статьи по расчёту возраста: