KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как вставить дату последнего изменения в верхний или нижний колонтитул Excel?

АвторСяоянДата изменения

В Excel можно быстро и легко вставить в верхний или нижний колонтитул такую информацию о книге, как имя файла, полный путь к нему, текущую дату и т.д. Но пробовали ли вы когда-нибудь добавить в колонтитулы дату и время последнего изменения листа? К сожалению, Excel не предлагает встроенной возможности для вставки этой информации в колонтитулы — поэтому я покажу вам удобный способ решить эту задачу.

Вставка Дата изменения даты в верхний или нижний колонтитул Excel с помощью кода VBA

Вставка Дата изменения даты/Время создания/пользователя в верхний/нижний колонтитул с помощью Kutools для Excel хорошая идея


синяя стрелка вправо с пузырём Вставка Дата изменения даты в верхний или нижний колонтитул Excel с помощью кода VBA

Следующий простой код VBA поможет вам вставить дату и время последнего сохранения листа в верхний или нижний колонтитул. Выполните следующие действия:

1. Активируйте лист, в верхний или нижний колонтитул которого вы хотите вставить дату последнего изменения.

2. Затем нажмите и удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

3. В левой области VBAProject дважды щелкните ThisWorkbook, чтобы открыть модуль, затем скопируйте и вставьте приведённый ниже код.

Код VBA: Вставка Дата изменения даты в верхний или нижний колонтитул

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = "Last saved: " & Format(Date, "mm-dd-yy") & " " & Time
End Sub

Код вставлен в модуль ThisWorkbook

4. Затем сохраните и закройте этот код и перейдите к пункту Вид > Разметка страницы, чтобы просмотреть результат. Вы увидите, что дата и время последнего изменения были вставлены в центральный верхний колонтитул. См. снимки экрана:

Кнопка «Разметка страницы» на вкладке «Вид» на ленте
Стрелка
Дата и время последнего изменения вставлены в верхний колонтитул

Примечания:

1. Дата изменения обновляется автоматически вместе с временем при любом изменении и сохранении файла Excel.

2. Если вам нужно вставить эту последнюю дату и время сохранения в левый верхний/нижний колонтитул, правый верхний/нижний колонтитул или центральный нижний колонтитул, просто замените в приведённом выше коде CenterHeader на нужное вам значение.


синяя стрелка вправо с пузырём Вставка Дата изменения даты/Время создания/пользователя в верхний/нижний колонтитул с помощью Kutools для Excel

С помощью Kutools для Excel вы можете воспользоваться инструментом «Вставить информацию о книге», чтобы мгновенно добавить данные о книге в верхний колонтитул, нижний колонтитул или ячейку.

Kutools для Excel,оснащённый ИИ 🤖предлагает более 300 удобных функций для упрощения ваших задач.

После установки Kutools для Excel выполните указанные ниже действия:()Бесплатно скачать Kutools для Excel прямо сейчас!)

Нажмите KUTOOLS PLUS > Книга > Вставить информацию о книге, и в появившемся диалоговом окне отметьте нужную информацию для вставки. Затем в разделе Вставить в установите флажок Диапазон, Верхний колонтитул или Нижний колонтитул и укажите, куда именно вставлять: в левый, центральный или правый верхний/нижний колонтитул — в зависимости от ваших потребностей.
Диалоговое окно «Вставить сведения о книге»
Диалоговое окно «Вставить сведения о книге»

синяя стрелка вправо с пузырёмДемонстрация: легко вставить Вставить информацию о книге в ячейку/верхний колонтитул/нижний колонтитул с помощью Kutools для Excel

Kutools для Excel: Более 300 удобных инструментов всегда под рукой! Воспользуйтесь функциями на базе ИИ для более умной и быстрой работы!Скачать сейчас!

См. также:

Получение и вставка Время создания и Дата изменения времени в ячейки

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции…
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул…
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий…
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором…
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов…
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек