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ą.
Utwórz arkusze sekwencji z listy komórek z kodem VBA
Utwórz arkusze sekwencji z listy komórek za pomocą Kutools for Excel
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:
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:
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:
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:
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:
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:
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:
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
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...
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!