Как создать рабочие листы последовательности из диапазона ячеек в Excel?

Если у вас есть диапазон данных на вашем листе, и теперь вы хотите создать последовательность рабочих листов на основе данных ячеек, см. Следующий снимок экрана. Конечно, вы можете редактировать имя рабочего листа по одному вручную, но если нужно отредактировать несколько имен рабочих листов, этот способ будет хлопотным и трудоемким. Здесь я расскажу о некоторых простых приемах, которые могут вам помочь.

Создайте рабочие листы последовательности из списка ячеек с кодом VBA

Создание рабочих листов последовательности из списка ячеек с помощью Kutools for Excel

Создайте рабочие листы последовательности из списка ячеек с кодом VBA

Следующий код VBA может помочь вам добавить некоторые рабочие листы, имена которых основаны на содержимом ячеек после существующих рабочих листов. Пожалуйста, сделайте так:

1. Удерживайте ALT + F11 ключи, затем он открывает Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: добавить рабочие листы последовательности на основе списка ячеек

Sub CreateWorkSheetByRange()
'Update 20130829
Dim WorkRng As Range
Dim Ws As Worksheet
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
arr = WorkRng.Value
Application.ScreenUpdating = False
For i = 1 To UBound(arr, 1)
    For j = 1 To UBound(arr, 2)
        Set Ws = Worksheets.Add(after:=Application.ActiveSheet)
        Ws.Name = arr(i, j)
    Next
Next
Application.ScreenUpdating = True
End Sub

3, Затем нажмите F5 нажмите клавишу для запуска этого кода, а затем появится диалоговое окно, в котором вы можете выбрать диапазон, который вы хотите использовать. Смотрите скриншот:

4, Затем нажмите OK, рабочие листы, названные значениями ячеек, были добавлены после существующего рабочего листа. Смотрите скриншот:

Ноты:

1. Новые листы будут вставлены после текущего листа.

2. Если выбранный диапазон включает пустые ячейки, листы получают имена по умолчанию. Смотрите скриншоты:

Создание рабочих листов последовательности из списка ячеек с помощью Kutools for Excel

Здесь я представляю удобный инструмент -Kutools for Excel, С его Создать рабочие листы последовательностей, вы можете быстро создавать рабочие листы с названием месяца, днем, настраиваемым списком и т. д.

Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас.

После установки Kutools for Excel выполните следующие действия:

1. Выберите диапазон, на основе которого вы хотите создать листы.

2. Нажмите Кутулс Плюс > Рабочий лист > Создать рабочие листы последовательностей, см. снимок экрана:

3. В Создать рабочие листы последовательностей диалоговом окне выберите тип рабочего листа, для которого вы хотите создать новые рабочие листы последовательности, а затем установите флажок Данные в диапазоне вариант, см. снимок экрана:

4. Затем нажмите OK , чтобы закрыть диалоговое окно, и была создана новая книга, содержащая листы, названные в соответствии с выбранными данными диапазона. Смотрите скриншот:

Ноты:

1. Если вы выберете Лист 1 или Лист 2, создаваемые новые рабочие листы будут иметь такое же форматирование, как Лист 1 или Лист 2.

2. Новые листы создаются в новой книге.

3. Если выбранный диапазон включает пустые ячейки, листы получают имена по умолчанию. Смотрите скриншоты:

Щелкните, чтобы узнать больше об этой функции создания рабочих листов последовательности.

Связанная статья:

Как добавить новые рабочие листы с настраиваемыми именами в Excel?