Gå til hovedindhold

Hvordan eksporteres og gemmes hvert regneark som separat ny projektmappe i Excel?

Forfatter: Kelly Sidst ændret: 2024-12-18

Eksportering og lagring af individuelle regneark som separate projektmapper i Excel er en almindelig opgave, især når du deler eller organiserer data. Mens manuel kopiering og indsættelse af arbejdsark i nye projektmapper er en mulighed, kan det være kedeligt og tidskrævende, især for projektmapper med flere ark. I denne guide vil vi udforske flere metoder til at opnå dette trin for trin, hvilket hjælper dig med at vælge den bedste løsning baseret på dine behov og ekspertise.


Gem arbejdsark som ny projektmappe én efter én med kommandoen Flyt eller Kopier

Brug af Flyt eller Kopier kommando hjælper dig med hurtigt at eksportere eller kopiere et eller flere regneark til en ny projektmappe.

Trin 1: Vælg regnearksnavnene på fanelinjen. Du kan vælge flere ved at holde nede Ctrl nøgle eller skifte nøgle.

Trin 2: Højreklik på regnearkets navn, og klik på Flyt eller Kopier fra kontekstmenuen.

Et skærmbillede af kommandoen Flyt eller Kopier i Excel

Trin 3: I Flyt eller Kopier dialogboksen skal du vælge (ny bog) element fra rullelisten over Flyt valgte ark til bog.

Et skærmbillede af dialogboksen Flyt eller Kopier, der viser muligheden for at flytte ark til en ny projektmappe

Trin 4: Klik derefter på OK, nu er du skiftet til ny projektmappe med eksporterede eller kopierede regneark skal du klikke på File (Felt) > Gem for at gemme den nye projektmappe.

Bemærk: I Flyt eller Kopier dialogboksen, er der en Opret en kopi mulighed. Hvis du ikke markerer det, flytter det de valgte regneark ud af den originale projektmappe. hvis du markerer det, kopieres det valgte regneark.


Batch-gemme regneark som ny projektmappe med Kutools til Excel

Hvis du har flere regneark, der skal gemmes som separat projektmappe, er den første metode ikke et godt valg. Og VBA-koden nedenfor kan være lidt kompliceret for Excel-begyndere. Her kan du bruge Opdelt arbejdsbog nytte af Kutools til Excel for nemt at batchgemme hvert regneark i en projektmappe for at adskille en ny projektmappe.

Kutools til Excel tilbyder over 300 avancerede funktioner til at strømline komplekse opgaver, hvilket øger kreativiteten og effektiviteten. Forbedret med AI-funktioner, Kutools automatiserer opgaver med præcision, hvilket gør datahåndtering ubesværet. Detaljerede oplysninger om Kutools til Excel...         Gratis prøveversion...

Efter installation af Kutools til Excelklik Kutools Plus > Workbook > Opdelt arbejdsbog at åbne Opdelt arbejdsbog dialog boks. Og konfigurer derefter som følger.

  1. Marker de regneark, du vil gemme som nye projektmapper. Som standard er alle arbejdsark markeret.
  2. Det er valgfrit at springe skjulte og tomme regneark over ved at markere de tilsvarende afkrydsningsfelter i Indstillinger sektion.
  3. Klik OK.
    Et skærmbillede af Kutools Split Workbook-værktøj til at gemme regneark som separate projektmapper
  4. A Vælg mappe dialogboksen dukker op, så skal du vælge en destinationsmappe for at gemme de nye projektmapper og klikke på Vælg mappe .

Derefter gemmes de angivne regneark eller alle regneark som separate nye projektmapper med det samme.

Noter:
  • Denne funktion giver dig mulighed for at gemme hvert regneark som individuel TXT-, CSV- eller PSF-fil. Du skal blot markere afkrydsningsfeltet Gem som type og vælge den tilsvarende mulighed, du har brug for, fra rullemenuen.
    Et skærmbillede af indstillingen Gem som type i Kutools Split Workbook-værktøj
  • For at bruge denne funktion skal du have Kutools til Excel installeret på din computer. Gå til download Kutools til Excel nu.

Eksporter og gem regneark som ny projektmappe med VBA-kode

Denne følgende kode eksporterer hvert synligt regneark i en ny projektmappe og gemmer projektmappen med navnet på det originale ark i en nyoprettet mappe i samme sti som den aktive projektmappe. Gør som følger:

Trin 1: Hold nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.

Trin 2: Klik indsatte > Moduler, og indsæt følgende makro i modulvinduet:

VBA: Eksporter og gem regneark som ny projektmappe i en ny mappe.

Sub SplitWorkbook()
'Updateby20200806
Dim FileExtStr As String
Dim FileFormatNum As Long
Dim xWs As Worksheet
Dim xWb As Workbook
Dim xNWb As Workbook
Dim FolderName As String
Application.ScreenUpdating = False
Set xWb = Application.ThisWorkbook

DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = xWb.Path & "\" & xWb.Name & " " & DateString

If Val(Application.Version) < 12 Then
    FileExtStr = ".xls": FileFormatNum = -4143
Else
    Select Case xWb.FileFormat
        Case 51:
            FileExtStr = ".xlsx": FileFormatNum = 51
        Case 52:
            If Application.ActiveWorkbook.HasVBProject Then
                FileExtStr = ".xlsm": FileFormatNum = 52
            Else
                FileExtStr = ".xlsx": FileFormatNum = 51
            End If
        Case 56:
            FileExtStr = ".xls": FileFormatNum = 56
        Case Else:
            FileExtStr = ".xlsb": FileFormatNum = 50
        End Select
End If

MkDir FolderName

For Each xWs In xWb.Worksheets
On Error GoTo NErro
    If xWs.Visible = xlSheetVisible Then
    xWs.Select
    xWs.Copy
    xFile = FolderName & "\" & xWs.Name & FileExtStr
    Set xNWb = Application.Workbooks.Item(Application.Workbooks.Count)
    xNWb.SaveAs xFile, FileFormat:=FileFormatNum
    xNWb.Close False, xFile
    End If
NErro:
    xWb.Activate
Next

    MsgBox "You can find the files in " & FolderName
    Application.ScreenUpdating = True
End Sub

Trin 3: Tryk på F5 nøgle til at køre denne kode. Og der vises en hurtigboks for at fortælle dig placeringen af ​​de nye eksporterede projektmapper, og alle regnearkene i den originale projektmappe er eksporteret til nogle nye separate projektmapper, der navngiver originale ark i en ny specifik mappe. Se skærmbilleder:

Et skærmbillede af VBA-kodeoutput, der viser gemte arbejdsark som nye projektmapper

Demo: Eksporter og gem hvert ark som ny projektmappe

Kutools til Excel: Over 300 praktiske værktøjer lige ved hånden! Nyd permanent gratis AI-funktioner! Hent nu!

Relaterede artikler:

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...


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!