Przejdź do głównej zawartości

Jak tworzyć arkusze sekwencji z zakresu komórek w programie Excel?

Jeśli masz zakres danych w swoim arkuszu, a teraz chcesz utworzyć sekwencję arkuszy na podstawie danych komórki, zobacz poniższy zrzut ekranu. Oczywiście możesz ręcznie edytować nazwę arkusza po kolei, ale jeśli istnieje potrzeba edycji wielu nazw arkuszy, będzie to kłopotliwe i czasochłonne. Tutaj omówię kilka szybkich sztuczek, które ci pomogą.

doc-stwórz-arkusze-z-listy1

Utwórz arkusze sekwencji z listy komórek z kodem VBA

Utwórz arkusze sekwencji z listy komórek za pomocą Kutools for Excel


strzałka niebieski prawy bąbelek Utwórz arkusze sekwencji z listy komórek z kodem VBA

Poniższy kod VBA może pomóc w dodaniu niektórych arkuszy roboczych, które są nazwane na podstawie zawartości komórki po istniejących arkuszach. Zrób tak:

1. Przytrzymaj ALT + F11 klucze, a następnie otwiera Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w Okno modułu.

Kod VBA: dodaj arkusze sekwencji na podstawie listy komórek

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. Następnie naciśnij F5 klucz, aby uruchomić ten kod, a następnie pojawi się okno zachęty, w którym można wybrać zakres, którego chcesz użyć. Zobacz zrzut ekranu:

doc-stwórz-arkusze-z-listy2

4. A następnie kliknij OK, arkusze robocze, których nazwy są zgodne z wartościami komórek, zostały dodane po istniejącym arkuszu. Zobacz zrzut ekranu:

doc-stwórz-arkusze-z-listy3

Uwagi:

1. Nowe arkusze zostaną wstawione po bieżącym arkuszu.

2. Jeśli wybrany zakres zawiera puste komórki, nazwy arkuszy są oparte na domyślnych. Zobacz zrzuty ekranu:

doc-stwórz-arkusze-z-listy4
-1
doc-stwórz-arkusze-z-listy5

strzałka niebieski prawy bąbelek Utwórz arkusze sekwencji z listy komórek za pomocą Kutools for Excel

Tutaj przedstawiam przydatne narzędzie-Kutools dla programu Excel, Z siedzibą w Utwórz Arkusze Sekwencji, możesz szybko tworzyć arkusze robocze z nazwą miesiąca, nazwą dnia, niestandardową listą i tak dalej.

Kutools dla programu Excel zawiera ponad 300 przydatnych narzędzi programu Excel. Bezpłatne wypróbowanie bez ograniczeń w ciągu 30 dni. Pobierz teraz.

Po zainstalowaniu Kutools dla programu Excel wykonaj następujące czynności:

1. Wybierz zakres, na podstawie którego chcesz utworzyć arkusze.

2. Kliknij Enterprise > Narzędzia arkusza roboczego > Utwórz Arkusze Sekwencjizobacz zrzut ekranu:

doc-stwórz-arkusze-z-listy6

3, w Utwórz Arkusze Sekwencji W oknie dialogowym wybierz typ arkusza, w którym chcesz utworzyć nowe arkusze sekwencji, a następnie zaznacz Dane w zakresie opcja, patrz zrzut ekranu:

doc-stwórz-arkusze-z-listy7

4. Następnie kliknij OK aby zamknąć okno dialogowe, został utworzony nowy skoroszyt zawierający arkusze robocze o nazwach zgodnych z danymi wybranego zakresu. Zobacz zrzut ekranu:

doc-stwórz-arkusze-z-listy8

Uwagi:

1. Jeśli wybierzesz Arkusz 1 lub Arkusz 2, tworzone nowe arkusze będą miały takie samo formatowanie jak Arkusz 1 lub Arkusz 2.

2. Nowe arkusze są tworzone w nowym skoroszycie.

3. Jeśli wybrany zakres zawiera puste komórki, nazwy arkuszy są oparte na domyślnych. Zobacz zrzuty ekranu:

doc-stwórz-arkusze-z-listy9
-1
doc-stwórz-arkusze-z-listy10

Kliknij, aby dowiedzieć się więcej o tej funkcji tworzenia arkuszy sekwencji.


Podobne artykuły:

Jak dodać nowe arkusze robocze z niestandardowymi nazwami w programie Excel?

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
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