Прескочи на основното съдържание

Как да добавя нов работен лист с текуща дата в Excel?

Автор: Xiaoyang Последна промяна: 2014-07-31

Някои финансови и търговски лица може да изискват да вмъкват нов работен лист с текуща дата всеки ден за статистиката на ежедневната работа. Ако вмъкнете нов работен лист и след това го преименувате ръчно, това ще бъде тромаво. Днес ще ви представя няколко бързи трика за справяне с този проблем.

Добавете нов работен лист с текуща дата, като използвате VBA код

Добавете нови работни листове с последователна дата с помощта на Kutools за 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 ключ за изпълнение на този код и нов лист с днешна дата е вмъкнат след съществуващите работни листове. Вижте екранна снимка:

doc-добавяне на лист-с-дата-1

Забележка: Когато запазите и затворите тази работна книга, моля, запазете я като Работна книга с активирани макроси на Excel форматирайте чрез щракване досие > Save As. И когато стартирате работната книга на следващия ден, не забравяйте да щракнете Разрешете съдържанието, за да можете успешно да изпълните кода, за да добавите нов работен лист с дата.


стрелка син десен балон Добавете нови работни листове с последователна дата с помощта на Kutools за Excel

Горният код може да ви помогне да вмъкнете само един работен лист с текуща дата на ден, ако искате да вмъкнете няколко работни листа с последователна дата, тази помощна програма Създаване на работни листове за последователност of Kutools за Excel ще ти направи услуга.

Kutools за Excel включва повече от 300 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега.

Ако сте инсталирали Kutools за Excel, моля, направете следното:

1. В празна клетка, моля, въведете днешната дата и след това плъзнете манипулатора за попълване, за да попълните клетките с поредицата от дати, както ви е необходимо.

doc-добавяне на лист-с-дата-1

2, След това кликнете Enterprise > Инструменти за работни листове > Създаване на работни листове за последователност, вижте екранна снимка:

doc-добавяне на лист-с-дата-1

3. В Създаване на работни листове за последователност диалогов прозорец, посочете работен лист, от който искате да се базират новите листове Основен работен лист падащ списък. И след това изберете Данни в диапазон опция под Имена на листове, базирани на за да изберете диапазон от данни, който искате да използвате като имена на листове. Вижте екранна снимка:

doc-добавяне на лист-с-дата-1

4, След това кликнете OKи ще бъде създадена нова работна книга с имената на листовете са последователност от дати. Вижте екранна снимка:

doc-добавяне на лист-с-дата-1

За да научите повече за тази функция за създаване на работни листове за последователност.


Свързана статия:

Как да създадете работни листове с последователност от диапазон от клетки в Excel?

Най-добрите инструменти за продуктивност в офиса

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

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations