Как да добавя нов работен лист с текуща дата в Excel?
Някои финансови и търговски лица може да изискват да вмъкват нов работен лист с текуща дата всеки ден за статистиката на ежедневната работа. Ако вмъкнете нов работен лист и след това го преименувате ръчно, това ще бъде тромаво. Днес ще ви представя няколко бързи трика за справяне с този проблем.
Добавете нов работен лист с текуща дата, като използвате 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 ключ за изпълнение на този код и нов лист с днешна дата е вмъкнат след съществуващите работни листове. Вижте екранна снимка:
Забележка: Когато запазите и затворите тази работна книга, моля, запазете я като Работна книга с активирани макроси на Excel форматирайте чрез щракване досие > Save As. И когато стартирате работната книга на следващия ден, не забравяйте да щракнете Разрешете съдържанието, за да можете успешно да изпълните кода, за да добавите нов работен лист с дата.
Добавете нови работни листове с последователна дата с помощта на Kutools за Excel
Горният код може да ви помогне да вмъкнете само един работен лист с текуща дата на ден, ако искате да вмъкнете няколко работни листа с последователна дата, тази помощна програма Създаване на работни листове за последователност of Kutools за Excel ще ти направи услуга.
Kutools за Excel включва повече от 300 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега.
Ако сте инсталирали Kutools за Excel, моля, направете следното:
1. В празна клетка, моля, въведете днешната дата и след това плъзнете манипулатора за попълване, за да попълните клетките с поредицата от дати, както ви е необходимо.
2, След това кликнете Enterprise > Инструменти за работни листове > Създаване на работни листове за последователност, вижте екранна снимка:
3. В Създаване на работни листове за последователност диалогов прозорец, посочете работен лист, от който искате да се базират новите листове Основен работен лист падащ списък. И след това изберете Данни в диапазон опция под Имена на листове, базирани на за да изберете диапазон от данни, който искате да използвате като имена на листове. Вижте екранна снимка:
4, След това кликнете OKи ще бъде създадена нова работна книга с имената на листовете са последователност от дати. Вижте екранна снимка:
За да научите повече за тази функция за създаване на работни листове за последователност.
Свързана статия:
Как да създадете работни листове с последователност от диапазон от клетки в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!