Как в Excel автоматически вводить дату: от горячих клавиш до динамических формул

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

=WEEKNUM(TODAY())

⚠️ Внимание: Если файл не открывался несколько дней, дата в TODAY() не обновляется retroactively. Она изменится только при следующем пересчёте. Это может исказить данные в отчётах, привязанных к "сегодняшней" дате.

—— • —— • ——

3. Функция NOW(): дата + время с автоматическим обновлением

Когда нужна не только дата, но и точное время, пригодится функция =NOW(). Она возвращает текущие дату и время (например, 15.05.2026 14:30:45) и обновляется при каждом изменении в таблице или открытии файла.

Ключевые особенности:

• 🔄 Обновляется чаще, чем TODAY(), так как реагирует на любые изменения в книге (даже если вы редактируете другую ячейку).
• ⏱️ Для фиксации времени с точностью до секунды используйте формат ячейки дд.мм.гггг чч:мм:сс.
• 📉 Чтобы отобразить только время, примените формат чч:мм или используйте =TIME(HOUR(NOW()), MINUTE(NOW()), 0).

Пример: если вам нужно зафиксировать время создания записи, но при этом обновлять дату, комбинируйте функции:

=TODAY() & " " & TEXT(NOW(), "чч:мм")

—— • —— • ——

4. Автоматическая дата при изменении данных (с помощью VBA)

Допустим, вам нужно, чтобы дата обновлялась не при открытии файла, а при изменении конкретной ячейки. Например, в таблице заказов дата в колонке "Последнее обновление" должна меняться, когда редактируется статус. Для этого понадобится макрос VBA.

Инструкция:

1. Нажмите Alt+F11, чтобы открыть редактор VBA.
2. Дважды кликните на лист, где нужна автоматическая дата.
3. Вставьте код:

   Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("B2:B100")) Is Nothing Then
   Range("C" & Target.Row).Value = Date
   End If
   End Sub

   Здесь B2:B100 — диапазон ячеек, изменения в которых будут триггерить обновление даты в колонке C.

4. Сохраните файл как .xlsm (с поддержкой макросов).

⚠️ Внимание: Макросы могут не работать, если в настройках Excel отключена поддержка VBA (проверьте в Файл → Параметры → Центр управления безопасностью). Также макросы блокируются в файлах, открытых в браузере (например, в Excel Online).

Убедиться, что файл сохранён как .xlsm|Включить поддержку макросов в настройках|Проверить диапазоны ячеек в коде|Создать резервную копию файла-->

—— • —— • ——

5. Фиксация даты при первом вводе данных (без VBA)

Если VBA вам не подходит, можно обойтись формулой, которая будет фиксировать дату только при первом заполнении ячейки. Для этого:

1. В ячейку B2 (где нужна дата) введите:

   =IF(A2<>"", IF(B2="", TODAY(), B2), "")

   Здесь A2 — ячейка, при заполнении которой должна фиксироваться дата.

2. Растяните формулу на нужный диапазон.
3. Скопируйте столбец с датами и вставьте как значения (Правка → Специальная вставка → Значения), чтобы удалить формулы.

Как это работает: формула проверяет, заполнена ли ячейка A2. Если да и ячейка с датой (B2) пустая, вставляется текущая дата. Если B2 уже содержит дату, она не обновляется.

—— • —— • ——

6. Автоматическая дата в заголовках и колонтитулах

Если вам нужно добавить дату в колонтитул (например, для печати отчётов), сделайте следующее:

1. Перейдите в Вставка → Колонтитулы (или Вид → Разметка страницы).
2. Кликните на область колонтитула, куда хотите вставить дату.
3. В панели инструментов колонтитулов нажмите Дата (вставляет статическую дату) или Текущая дата (обновляется при печати).

Для динамической даты, которая будет обновляться при каждом открытии файла, используйте поле &[Дата] в ручном режиме:

• 📄 В колонтитуле введите &"Дата: "&D — это вставит текущую дату в формате по умолчанию.
• 🕒 Для даты и времени: &"Последнее обновление: "&D &" "&T.

⚠️ Внимание: Дата в колонтитулах обновляется только при печати или предварительном просмотре. В обычном режиме просмотра она может отображаться некорректно.

—— • —— • ——

7. Распространённые ошибки и как их избежать

Даже опытные пользователи сталкиваются с проблемами при работе с автоматическими датами в Excel. Вот наиболее частые ошибки и их решения:

Критическая особенность: если вы копируете ячейку с функцией TODAY() в другой файл, дата может "застыть" на значении из исходного документа. Чтобы этого избежать, используйте специальную вставку (Значения и форматы).

—— • —— • ——

FAQ: Ответы на частые вопросы

=IF(WEEKDAY(TODAY(),2)=1, TODAY(), B2)

=TEXT(TODAY(), "д мmmм гггг")

=AND(A2<>"", B2="")