Как добавить новый лист с текущей датой в Excel?
Некоторым финансовым и торговым специалистам может потребоваться каждый день вставлять новый рабочий лист с текущей датой для статистики ежедневной работы. Если вы вставите новый рабочий лист, а затем переименуете его вручную, он будет громоздким. Сегодня я расскажу вам несколько быстрых приемов решения этой проблемы.
Добавить новый лист с текущей датой с помощью кода VBA
Добавить новые рабочие листы с последовательной датой с помощью Kutools for Excel
Добавить новый лист с текущей датой с помощью кода VBA
Следующий код VBA поможет вам вставить новый рабочий лист с текущей датой, когда вы запускаете код каждый день.
1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.
2. Нажмите Вставить > Модули, и вставьте следующий макрос в Окно модуля.
Код VBA: добавить новый лист с текущей датой
Sub AddSheets_TodayDate()
'Updateby20140717
Dim szTodayDate As String
szTodayDate = Format(Date, "mmm-dd-yyyy")
On Error GoTo MakeSheet
Sheets(szTodayDate).Activate
Exit Sub
MakeSheet:
Sheets.Add , Worksheets(Worksheets.Count)
ActiveSheet.Name = szTodayDate
End Sub
3, Затем нажмите F5 ключ для запуска этого кода, и новый лист с сегодняшней датой был вставлен после существующих листов. Смотрите скриншот:
Внимание: Когда вы сохраните и закроете эту книгу, сохраните ее как Excel Macro-Enabled Workbook форматировать, нажав Файл > Сохранить как. И когда вы запустите книгу на следующий день, обязательно нажмите Включить контент, чтобы вы могли успешно запустить код для добавления нового листа даты.
Добавить новые рабочие листы с последовательной датой с помощью Kutools for Excel
Приведенный выше код может помочь вам вставить только один лист с датой текущего дня за раз, если вы хотите вставить несколько листов с последовательной датой, эта утилита Создать рабочие листы последовательностей of Kutools for Excel сделаю вам одолжение.
Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас.
Если вы установили Kutools for Excel, сделайте следующее:
1. В пустой ячейке введите сегодняшнюю дату, а затем перетащите маркер заполнения, чтобы заполнить ячейки нужной последовательностью дат.
2. Затем нажмите Предприятие > Инструменты рабочего листа > Создать рабочие листы последовательностей, см. снимок экрана:
3. В Создать рабочие листы последовательностей диалоговом окне укажите рабочий лист, на основе которого вы хотите создать новые листы Базовый рабочий лист раскрывающийся список. А затем выберите Данные в диапазоне вариант под Имена листов на основе раздел, чтобы выбрать диапазон данных, который вы хотите использовать в качестве имен листов. Смотрите скриншот:
4. Затем нажмите OK, и будет создана новая книга с именами листов в порядке дат. Смотрите скриншот:
Чтобы узнать больше об этой функции создания рабочих листов последовательности.
Связанная статья:
Как создать рабочие листы последовательности из диапазона ячеек в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!