Jak vytvořit pracovní listy sekvence z řady buněk v aplikaci Excel?
Pokud máte v listu řadu dat a nyní chcete vytvořit posloupnost listů na základě dat buňky, viz následující snímek obrazovky. Samozřejmě můžete název listu upravovat jeden po druhém ručně, ale pokud je třeba upravit více názvů listů, bude to obtížné a časově náročné. Zde budu mluvit o několika rychlých tricích, které vám pomohou.
Vytvořte pracovní listy sekvence ze seznamu buněk pomocí kódu VBA
Vytvářejte pracovní listy sekvence ze seznamu buněk pomocí Kutools pro Excel
Vytvořte pracovní listy sekvence ze seznamu buněk pomocí kódu VBA
Následující kód VBA vám pomůže přidat některé listy, které jsou pojmenovány na základě obsahu buňky po existujících listech. Udělejte prosím toto:
1. Podržte ALT + F11 klávesy, pak se otevře Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Okno modulu.
Kód VBA: přidejte pracovní listy sekvence na základě seznamu buněk
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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a poté se zobrazí okno s výzvou k výběru rozsahu, který chcete použít. Viz snímek obrazovky:
4. A pak klikněte na tlačítko OK, byly listy, které jsou pojmenovány podle hodnot buněk, přidány za existující list. Viz snímek obrazovky:
Poznámky:
1. Nové listy se vloží za aktuální list.
2. Pokud vybraný rozsah obsahoval prázdné buňky, jsou pracovní listy pojmenovány podle výchozího nastavení. Zobrazit snímky obrazovky:
Vytvářejte pracovní listy sekvence ze seznamu buněk pomocí Kutools pro Excel
Zde představuji praktický nástroj -Kutools pro Excel, S jeho Vytvořte pracovní listy sekvence, můžete rychle vytvářet pracovní listy s názvem měsíce, názvem dne, vlastním seznamem atd.
Kutools pro Excel obsahuje více než 300 užitečných nástrojů aplikace Excel. Zdarma to můžete vyzkoušet bez omezení do 30 dnů. Získat nyní.
Po instalaci Kutools pro Excel proveďte následující kroky:
1. Vyberte rozsah, na kterém chcete vytvořit pracovní listy.
2. klikněte Enterprise > Nástroje listu > Vytvořte pracovní listy sekvence, viz screenshot:
3. V Vytvořte pracovní listy sekvence V dialogovém okně vyberte typ listu, který chcete vytvořit nové listy sekvence, a poté zkontrolujte Data v rozsahu možnost, viz screenshot:
4. Pak klikněte na tlačítko OK zavřete dialogové okno a byl vytvořen nový sešit, který obsahuje listy, podle vybraných dat rozsahu. Viz snímek obrazovky:
Poznámky:
1. Pokud zvolíte List 1 nebo List 2, budou vytvořené nové listy mít stejné formátování jako List 1 nebo List 2.
2. Nové listy jsou vytvořeny v novém sešitu.
3. Pokud vybraný rozsah obsahoval prázdné buňky, jsou pracovní listy pojmenovány podle výchozího nastavení. Zobrazit snímky obrazovky:
Klepnutím získáte další informace o této funkci Vytvořit pracovní listy sekvence.
Související článek:
Jak přidat nové listy s přizpůsobenými názvy v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!