Как да създадете нова работна книга с определен брой работни листове?
Обикновено, когато създавате нова работна книга, тя ще включва три работни листа в Excel 2007 / 2010 или един лист в Excel 2013 по подразбиране. По-късно можете да добавите или изтриете разделите според вашите нужди. Но опитвали ли сте някога да създавате нова работна книга с определен брой работни листове всеки път, когато имате нужда?
Създайте нова работна книга с определен брой работни листове, като използвате VBA код
Създайте нова работна книга с определен брой работни листове, като използвате Kutools за Excel
Създайте нова работна книга с определен брой работни листове, като използвате VBA код
Можете да използвате следния VBA код, за да създадете нова работна книга, съдържаща определен брой раздели.
1. Задръжте натиснат ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. Щракнете Поставете > Модулии поставете следния код в Модули Window.
VBA код: Създайте нова работна книга с определен брой работни листове
Sub MakeWorkbook()
'update Extendoffice
Dim xOldCount As Integer
Dim xNewCount As Variant
xOldCount = Application.SheetsInNewWorkbook
xNewCount = Application.InputBox("How many sheets in the new workbook do you want?", "Kutools for Excel", , , , , , 1)
If xNewCount = False Then Exit Sub
If (xNewCount < 1) Or (CLng(xNewCount) > 255) Then
MsgBox "The number must between 1 and 255!"
Exit Sub
End If
With Application
.SheetsInNewWorkbook = xNewCount
.Workbooks.Add
.SheetsInNewWorkbook = xNewCount
End With
End Sub
3. След като поставите кода, натиснете F5 ключ, за да стартирате този код, и в полето за подкана, моля, въведете броя листове, които искате в работната книга, вижте екранната снимка:
4, След това кликнете OK новата работна книга е създадена с посочения брой листове, от които се нуждаете.
Създайте нова работна книга с определен брой работни листове, като използвате Kutools за Excel
Ако не сте запознати с VBA кода, можете да приложите удобен инструмент – Kutools за Excel, Със своята Създаване на работни листове за последователност помощна програма, можете бързо да създадете нова работна книга с имена на листове по подразбиране, потребителски имена на листове и т.н.
Kutools за Excel : с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. |
След инсталиране Kutools за Excel, моля, направете следното:
1. Щракнете Enterprise > Работен лист > Създаване на работен лист за последователност, вижте екранна снимка:
2. в Създаване на работни листове за последователност диалогов прозорец, направете следните операции:
(1.) Изберете Празен работен лист под Основен работен лист падащ списък;
(2.) Въведете броя на листовете в новата работна книга под Броят на Създаване текстово поле;
(3.) От Имена на листове, базирани на раздел, изберете Име по подразбиране в Excel опция.
3, След това кликнете OK и новата работна книга ще бъде създадена с конкретния ви брой работни листове.
Кликнете, за да научите повече за тази помощна програма Create Sequence Worksheet...
Безплатно изтегляне Kutools за Excel сега
Още по темата:
Как да създадете работни листове с последователност от диапазон от клетки в Excel?
Как да добавя нов работен лист с текуща дата в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!