Работа с датами в Excel: от возраста до цвета ячейки

Иван Корнев·13.04.2026·⏱4 мин

Чтобы определить возраст по дате рождения, используйте формулу =DATEDIF(A2; СЕГОДНЯ(); "Y"). Для извлечения месяца примените =МЕСЯЦ(A2) или =ТЕКСТ(A2; "mmmm") для текстового формата. Определение диапазона (квартала) делается через комбинацию функций ОКРУГЛВВЕРХ и МЕСЯЦ, а проверка цвета ячейки возможна только через макросы VBA или условное форматирование. Ниже приведены подробные инструкции и готовые решения для каждой задачи.

Расчет возраста и временных интервалов

Самая частая задача — вычислить точный возраст человека или срок действия документа на текущую дату. Стандартная функция РАЗНДАТ (или DATEDIF в английской версии) идеально подходит для этого, так как учитывает високосные годы и разницу в днях.

Формула полного возраста

Для получения количества полных лет:

=РАЗНДАТ(A2; СЕГОДНЯ(); "Y")

Где A2 — ячейка с датой рождения.

Возраст с указанием месяцев и дней

Если требуется более детальная информация (например, «35 лет 4 мес.»), объедините несколько вызовов функции:

=РАЗНДАТ(A2; СЕГОДНЯ(); "Y") & " лет " & РАЗНДАТ(A2; СЕГОДНЯ(); "YM") & " мес."

Параметр "YM" возвращает количество месяцев, игнорируя годы, что позволяет получить остаток после вычисления полных лет.

Функция СЕГОДНЯ() обновляется автоматически при каждом открытии файла. Если нужно зафиксировать возраст на конкретную дату (например, на момент отчета), замените СЕГОДНЯ() на ссылку на ячейку с этой датой или впишите дату вручную в кавычках: "01.01.2026".

Извлечение месяца и группировка по периодам

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

Получение названия месяца

Чтобы превратить дату 15.04.2026 в слово «Апрель»:

=ТЕКСТ(A2; "mmmm")

Для сокращенного варианта («Апр»):

=ТЕКСТ(A2; "mmm")

Определение квартала (Q1–Q4)

В Excel нет отдельной функции для квартала, но её легко создать математически. Делим номер месяца на 3 и округляем результат вверх:

="Q" & ОКРУГЛВВЕРХ(МЕСЯЦ(A2)/3; 0) & " " & ГОД(A2)

Эта формула вернет строку вида Q2 2026.

Комбинированный период «Месяц Год»

Удобный формат для заголовков строк в отчетах:

=ТЕКСТ(A2; "mmmm yyyy")

Результат: Апрель 2026.

Определение диапазона дат

Под «диапазоном» часто понимают принадлежность даты к определенному временному отрезку (например, финансовому году или акции).

Проверка попадания в интервал

Используйте функцию И (AND) для проверки границ:

=ЕСЛИ(И(A2>=ДАТА(2026;1;1); A2<=ДАТА(2026;3;31)); "1 Квартал"; "Другой период")

Этот метод надежнее простого сравнения, так как явно задает границы.

Динамическая группировка

Если у вас есть таблица со списком периодов (начало и конец), используйте ВПР с приблизительным совпадением или ПРОСМОТР:

=ПРОСМОТР(A2; $F$2:$F$10; $G$2:$G$10)

Где столбец F содержит начала периодов, а G — их названия. Данные в столбце F должны быть отсортированы по возрастанию.

Анализ цвета ячейки

Excel не имеет встроенной формулы для чтения цвета заливки ячейки (например, =GETCOLOR(A2) не существует). Цвет — это элемент форматирования, а не значение данных. Решить задачу можно двумя способами.

Способ 1: Условное форматирование (Рекомендуемый)

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

=ЕСЛИ(A2<СЕГОДНЯ(); "Просрочено"; "Актуально")

Затем настройте условное форматирование: если ячейка содержит «Просрочено», красить её в красный. Это делает данные прозрачными и сортируемыми.

Способ 2: Пользовательская функция VBA

Если критически важно считать именно визуальный цвет (например, кто-то закрасил ячейки вручную без правил), потребуется макрос.

Нажмите Alt + F11, вставьте новый модуль.
Вставьте код:

   Function GetCellColor(rng As Range) As Long
       GetCellColor = rng.Interior.Color
   End Function

В ячейке используйте формулу: =GetCellColor(A2). Она вернет числовой код цвета (например, 255 для красного).

Файлы с макросами необходимо сохранять в формате .xlsm. При отправке таким файлов коллегам у них может быть отключено выполнение макросов, что приведет к ошибке #ИМЯ?.

Сводная таблица формул

Задача	Формула (для русскоязычного Excel)	Пример результата
Возраст (полных лет)	`=РАЗНДАТ(A2; СЕГОДНЯ(); "Y")`	35
Возраст (лет и мес.)	`=РАЗНДАТ(A2; СЕГОДНЯ(); "Y") & " л. " & РАЗНДАТ(A2; СЕГОДНЯ(); "YM") & " мес."`	35 л. 4 мес.
Название месяца	`=ТЕКСТ(A2; "mmmm")`	Апрель
Номер месяца	`=МЕСЯЦ(A2)`	4
Квартал	`="Q"&ОКРУГЛВВЕРХ(МЕСЯЦ(A2)/3; 0)`	Q2
Год	`=ГОД(A2)`	2026
День недели	`=ТЕКСТ(A2; "ДДДД")`	Понедельник

Частые ошибки

Дата сохранена как текст. Если формулы возвращают ошибки, проверьте формат ячейки. Дата должна быть выровнена по правому краю (по умолчанию). Если она слева — измените формат на «Дата» или используйте «Текст по столбцам» для конвертации.
Неверные разделители. В русской локали аргументы функций разделяются точкой с запятой (;), а не запятой. Формула =DATEDIF(A2, TODAY(), "Y") выдаст ошибку, правильная запись: =РАЗНДАТ(A2; СЕГОДНЯ(); "Y").
Отрицательный возраст. Функция РАЗНДАТ требует, чтобы конечная дата была больше начальной. Если дата рождения в будущем, формула вернет #ЧИСЛО!. Добавьте проверку: =ЕСЛИ(A2>СЕГОДНЯ(); "Ошибка"; РАЗНДАТ(...)).

FAQ

Можно ли посчитать стаж работы в годах и месяцах? Да, логика та же, что и с возрастом. Вместо даты рождения подставьте дату приема на работу: =РАЗНДАТ(ДатаПриема; СЕГОДНЯ(); "Y") & " лет " & РАЗНДАТ(ДатаПриема; СЕГОДНЯ(); "YM") & " мес.".

Как выделить цветом все даты текущего месяца? Выделите диапазон дат, выберите «Условное форматирование» → «Создать правило» → «Использовать формулу». Введите: =И(МЕСЯЦ(A2)=МЕСЯЦ(СЕГОДНЯ()); ГОД(A2)=ГОД(СЕГОДНЯ())). Выберите нужный цвет заливки.

Почему формула цвета через VBA не работает? Убедитесь, что файл сохранен как «Книга Excel с поддержкой макросов (.xlsm)» и что в настройках безопасности включено выполнение макросов. Также функция не обновляется автоматически при изменении цвета — нужно пересчитать лист (клавиша F9).