Перейти до основного матеріалу

Як створити робочі аркуші послідовностей з ряду комірок у Excel?

Якщо на вашому аркуші є діапазон даних, і тепер ви хочете створити послідовність аркушів на основі даних комірки, див. Наступний знімок екрана. Звичайно, ви можете редагувати назву робочого аркуша по одному вручну, але якщо потрібно відредагувати кілька імен робочих листів, цей спосіб буде складним та трудомістким. Тут я розповім про декілька швидких прийомів, які допоможуть вам.

doc-create-sheets-from-list1

Створіть аркуші послідовностей зі списку комірок з кодом VBA

Створіть аркуші послідовності зі списку комірок за допомогою Kutools для Excel


стрілка синя права міхур Створіть аркуші послідовностей зі списку комірок з кодом VBA

Наступний код VBA може допомогти вам додати деякі робочі аркуші, які названі на основі вмісту комірки після існуючих аркушів. Будь ласка, зробіть так:

1. Утримуйте клавішу ALT + F11 клавіші, потім відкриється Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у Вікно модуля.

Код 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 клавішу для запуску цього коду, і тоді з'явиться вікно запиту, щоб вибрати діапазон, який ви хочете використовувати. Дивіться знімок екрана:

doc-create-sheets-from-list2

4. А потім клацніть OK, робочі аркуші, які названі значеннями комірок, були додані після існуючого аркуша. Дивіться знімок екрана:

doc-create-sheets-from-list3

Примітки:

1. Нові аркуші будуть вставлені після поточного аркуша.

2. Якщо вибраний діапазон включав порожні клітинки, робочі таблиці називаються за замовчуванням. Дивіться скріншоти:

doc-create-sheets-from-list4
-1
doc-create-sheets-from-list5

стрілка синя права міхур Створіть аркуші послідовності зі списку комірок за допомогою Kutools для Excel

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

Kutools для Excel включає більше 300 зручних інструментів Excel. Безкоштовно спробувати без обмежень протягом 30 днів. Отримати зараз.

Після встановлення Kutools для Excel виконайте такі дії:

1. Виберіть діапазон, на основі якого ви хочете створити робочі аркуші.

2. Натисніть підприємство > Інструменти робочого аркуша > Створіть робочі аркуші послідовностей, див. скріншот:

doc-create-sheets-from-list6

3, в Створіть робочі аркуші послідовностей діалоговому вікні виберіть тип робочого аркуша, для якого потрібно створити нові робочі аркуші послідовності, а потім поставте прапорець Дані в діапазоні варіант, див. скріншот:

doc-create-sheets-from-list7

4. Потім натисніть OK щоб закрити діалогове вікно, і створено нову книгу, яка містить робочі аркуші, названі вибраними даними діапазону. Дивіться знімок екрана:

doc-create-sheets-from-list8

Примітки:

1. Якщо ви виберете Аркуш 1 або Аркуш 2, нові робочі аркуші будуть мати таке саме форматування, як Аркуш 1 або Аркуш 2.

2. Нові аркуші створюються в новій книзі.

3. Якщо вибраний діапазон включав порожні клітинки, робочі таблиці називаються за замовчуванням. Дивіться скріншоти:

doc-create-sheets-from-list9
-1
doc-create-sheets-from-list10

Натисніть, щоб дізнатися більше про цю функцію Створення робочих аркушів послідовностей.


Пов'язана стаття:

Як додати нові аркуші з індивідуальними іменами в Excel?

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How to add bydefault table with row name and column name on sheets after creating sheets using command button. Please help.
This comment was minimized by the moderator on the site
How can the code be modified to copy a worksheet labeled "Template" and rename it to the values in the list selected in the range? I tried modifying the "worksheets.Add" code to "Worksheets("Template").Copy but it just makes copies with the worksheets labeled "Template(1)", "Template(2)", etc. Also, is there a way to put the tabs in numerical order as they are added?
This comment was minimized by the moderator on the site
Hi, Would it be possible to set-up a template for the new sheets created, instead of blank worksheets. Thanks Dave
This comment was minimized by the moderator on the site
Hi, I want to create invoices using excel and need to know whether is there a way to auto generate the second continuation page when the items on the first page exceed the A4 page layout that I have predefined? Any help is appreciated.
This comment was minimized by the moderator on the site
Could you modify the VBA code so that if the worksheet exists, it is skipped over? As it exists now, running the code a second time on the same range will create numbered worksheets. Thanks! Chris
This comment was minimized by the moderator on the site
Hello, Can I exclude blanks and automatically copy data with is behind the name? This data is generated from a pivot and I want to have all the names in different tabs with the data behind it in the layout. name1 data data data blank data data data blank Name 2 Thanks!
This comment was minimized by the moderator on the site
I need to duplicate one sheet when making all these new sheets from a list. Can you add the code for that? Thanks!
This comment was minimized by the moderator on the site
You can right click the tab and choose "move or copy" to duplicate it.
This comment was minimized by the moderator on the site
Very useful. thank you
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations