Gå til hovedindhold

Hvordan oprettes sekvensregneark fra en række celler i Excel?

Hvis du har en række data i dit regneark, og nu vil du oprette en sekvens af regneark baseret på celledataene, se følgende skærmbillede. Selvfølgelig kan du redigere navnet på regnearket en efter en manuelt, men hvis der er flere regnearknavne, der skal redigeres, vil denne måde være besværlig og tidskrævende. Her vil jeg tale om nogle hurtige tricks, der kan hjælpe dig.

doc-opret-ark-fra-liste1

Opret sekvens regneark fra listen over celler med VBA-kode

Opret sekvensark fra listen over celler med Kutools til Excel


pil blå højre boble Opret sekvens regneark fra listen over celler med VBA-kode

Følgende VBA-kode kan hjælpe dig med at tilføje nogle regneark, der er navngivet baseret på celleindholdet efter eksisterende regneark. Gør som dette:

1. Hold nede ALT + F11 tasterne, så åbner den Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: tilføj sekvens regneark baseret på listen over celler

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. Tryk derefter på F5 nøgle til at køre denne kode, og derefter vises en hurtigboks, som du kan vælge det område, du vil bruge. Se skærmbillede:

doc-opret-ark-fra-liste2

4. Og klik derefter på OK, de regneark, der er navngivet efter celleværdierne, er blevet tilføjet efter det eksisterende regneark. Se skærmbillede:

doc-opret-ark-fra-liste3

Bemærkninger:

1. De nye regneark indsættes efter det aktuelle regneark.

2. Hvis det valgte område indeholdt tomme celler, navngives regnearkene baseret på standard. Se skærmbilleder:

doc-opret-ark-fra-liste4
-1
doc-opret-ark-fra-liste5

pil blå højre boble Opret sekvensark fra listen over celler med Kutools til Excel

Her introducerer jeg et praktisk værktøj-Kutools til Excel, Med Opret sekvensark, kan du hurtigt oprette regneark med månedens navn, dagsnavn, brugerdefinerede liste og så videre.

Kutools til Excel indeholder mere end 300 praktiske Excel-værktøjer. Gratis at prøve uden begrænsning på 30 dage. Få det nu.

Efter installation af Kutools til Excel skal du gøre følgende:

1. Vælg det område, som du vil oprette regneark baseret på.

2. Klik Enterprise > Arbejdsarkværktøjer > Opret sekvensark, se skærmbillede:

doc-opret-ark-fra-liste6

3. I Opret sekvensark dialogboksen, skal du vælge den regnearktype, du vil oprette de nye sekvensark, og derefter kontrollere Data i et interval mulighed, se skærmbillede:

doc-opret-ark-fra-liste7

4. Klik derefter på OK for at lukke dialogboksen, og der er oprettet en ny projektmappe, der indeholder regnearkene, efter de valgte områdedata. Se skærmbillede:

doc-opret-ark-fra-liste8

Bemærkninger:

1. Hvis du vælger Ark 1 eller Ark 2, oprettes de nye regneark med samme formatering som Ark 1 eller Ark 2.

2. De nye regneark oprettes i en ny projektmappe.

3. Hvis det valgte område indeholdt tomme celler, navngives regnearkene baseret på standard. Se skærmbilleder:

doc-opret-ark-fra-liste9
-1
doc-opret-ark-fra-liste10

Klik for at få mere at vide om denne Create Sequence Worksheets-funktion.


Relateret artikel:

Hvordan tilføjes nye regneark med tilpassede navne i Excel?

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
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