Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

Иногда вы хотите создать новый лист и автоматически называть его определенным именем в Excel. В этой статье мы покажем вам два метода добавления нового листа с определенным именем в текущую книгу, а также создание рабочего листа с определенным именем в новой книге в Excel.

Автоматическое добавление нового листа с определенным именем в текущей книге с кодом VBA

Автоматическое добавление нового листа с определенным именем в новую книгу с помощью Kutools for Excel

Вкладка «Office» Включите редактирование и просмотр с вкладками в Office и упростите свою работу ...
Kutools для Excel добавляет расширенные функции 300 в Excel и повышает производительность на 80%
  • Super Formula Bar (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон ...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объединить дублирующиеся строки и сумму / среднее ... Предотвратить повторяющиеся клетки; Сравнить диапазоны ...
  • Выберите Дублировать или Уникальные строки; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих книгах; Случайный выбор ...
  • Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставьте маркеры, флажки и многое другое ...
  • Любить и быстро вставлять формулы, диапазоны, графики и рисунки; Шифровать ячейки с помощью пароля; Создать список рассылки и отправлять электронные письма ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев ...
  • Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенный Сортировать по месяцу / неделе / ​​дню, частоте и многому другому; Специальный фильтр жирным шрифтом, курсив ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разбить данные на несколько листов; Пакетное конвертирование xls, xlsx и PDF ...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.

Автоматическое добавление нового листа с определенным именем в текущей книге с кодом VBA


Вы можете добавить новый лист с определенным именем в конце текущей книги со следующим кодом VBA.

1. Нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окна.

2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > модуль.

3. Скопируйте и вставьте ниже кода VBA в модуль окна.

Код VBA: добавьте новый лист с определенным именем в конце текущей книги

Sub CreateSheet()
'Updated by ExtendOffice 20181009
    Dim xName As String
    Dim xSht As Object
    On Error Resume Next
    xName = InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
    If xName = "" Then Exit Sub
        Set xSht = Sheets(xName)
        If Not xSht Is Nothing Then
            MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
            Exit Sub
            End If
            Sheets.Add(, Sheets(Sheets.count)).Name = xName
        End Sub

4. Нажмите F5 для запуска кода. В появлении Kutools for Excel в диалоговом окне введите имя для этого листа, а затем нажмите OK кнопка. Смотрите скриншот:

Затем создается новый рабочий лист с определенным именем и находится в конце текущей книги.


Автоматическое добавление нового листа с определенным именем в новую книгу с помощью Kutools for Excel

В этом разделе мы представим Создание рабочих листов последовательности полезности Kutools for Excel, С помощью этой утилиты вы можете легко добавить новый лист с определенным именем в новую книгу.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни.

1. Для добавления нового листа с определенным именем вам нужно ввести это имя в ячейку заранее. Затем нажмите Предприятие > Рабочий лист > Создание рабочих листов последовательности, Смотрите скриншот:

2. в Создание рабочих листов последовательности диалоговое окно, выберите Пустой лист , который относится к Основной рабочий лист выпадающий список, выберите датав диапазоне и укажите ячейку, которая содержит определенное имя листа, и, наконец, нажмите OK кнопка. Смотрите скриншот:

Затем новый рабочий лист с этим конкретным именем из ячейки создается в новой книге немедленно.

Примечания:

1. Если вы хотите создать несколько новых листов с определенными именами одновременно, введите эти имена в ячейки один за другим, а затем выберите эти ячейки в Данные в диапазоне коробка.

2. Вы также можете создавать таблицы последовательностей из серийных номеров или настраиваемого списка с помощью этого Создание рабочих листов последовательности утилита. Смотрите скриншот:

Наконечник.Если вы хотите получить бесплатную пробную версию этой утилиты, перейдите по ссылке бесплатно скачать программное обеспечение сначала, а затем перейдите, чтобы применить операцию согласно вышеуказанным шагам.


Kutools для Excel - лучший инструмент для повышения производительности в офисе Повысьте производительность на 80%

  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905

Вкладка «Office» предоставляет интерфейс с вкладками для Office и упрощает работу

  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    guest · 11 months ago
    Hi, this does not properly account for user clicking cancel. It still creates worksheet.
    • To post as a guest, your comment is unpublished.
      crystal · 10 months ago
      Hi
      The code has been updated with the problem solving. Please have a try and thanks for your comment.
  • To post as a guest, your comment is unpublished.
    Lowri · 1 years ago
    Hi, I'm quite new to VBA, the above code works great for adding a new spreadsheet and renaming it, however I would then like it to automatically copy and paste the contents on my 'template' sheet into the new sheet? Can anybody help please?

    Thanks
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Good day,
      Please try the below VBA code. Hope it can help. Thanks for your comment.

      Sub CreateSheet()
      Dim xName As String
      Dim xSht As Object
      Dim xNWS As Worksheet
      On Error Resume Next
      xName = Application.InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
      If xName = "" Then Exit Sub
      Set xSht = Sheets(xName)
      If Not xSht Is Nothing Then
      MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
      Exit Sub
      End If
      ActiveSheet.Copy after:=Sheets(Sheets.count)
      Set xNWS = Sheets(Sheets.count)
      xNWS.Name = xName
      End Sub
      • To post as a guest, your comment is unpublished.
        Lowri · 10 months ago
        Thank you for your reply crystal! I have it working now :)