Как создать новую книгу с определенным количеством листов?
Обычно, когда вы создаете новую книгу, по умолчанию она будет включать три листа в Excel 2007/2010 или один лист в Excel 2013. Позже вы можете добавлять или удалять вкладки по своему усмотрению. Но пробовали ли вы когда-нибудь создавать новую книгу с определенным количеством листов каждый раз, когда вам нужно?
Создать новую книгу с определенным количеством листов с помощью кода VBA
Создайте новую книгу с определенным количеством листов с помощью Kutools for Excel
Создать новую книгу с определенным количеством листов с помощью кода VBA
Вы можете использовать следующий код VBA для создания новой книги, содержащей определенное количество вкладок.
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код 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 for Excel
Если вы не знакомы с кодом VBA, вы можете применить удобный инструмент - Kutools for Excel, С его Создать рабочие листы последовательностей Утилита, вы можете быстро создать новую книгу с именами листов по умолчанию, именами настраиваемых листов и т. д.
Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. |
После установки Kutools for Excel, пожалуйста, сделайте следующее:
1. Нажмите Предприятие > Рабочий лист > Создать рабочий лист последовательности, см. снимок экрана:
2. В Создать рабочие листы последовательностей диалоговом окне выполните следующие операции:
(1.) Выберите Пустой рабочий лист под Базовый рабочий лист раскрывающийся список;
(2.) Введите количество листов в новой книге под Количество Create текстовое окно;
(3.) Из Имена листов на основе раздел, выберите Имя по умолчанию в Excel опцию.
3. Затем нажмите OK , и будет создана новая книга с указанным вами количеством листов.
Нажмите, чтобы узнать больше об этой утилите Create Sequence Worksheet…
Бесплатная загрузка Kutools для Excel сейчас
Статьи по теме:
Как создать рабочие листы последовательности из диапазона ячеек в Excel?
Как добавить новый лист с текущей датой в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!