Wie exportiert und speichert man jedes Arbeitsblatt als separates neues Arbeitsblatt in Excel?
Das Exportieren und Speichern einzelner Arbeitsblätter als separate Arbeitsmappen in Excel ist eine häufige Aufgabe, insbesondere beim Teilen oder Organisieren von Daten. Obwohl das manuelle Kopieren und Einfügen von Arbeitsblättern in Neues Arbeitsblatt möglich ist, kann dies mühsam und zeitaufwendig sein – besonders bei Arbeitsmappen mit mehreren Blättern. In diesem Leitfaden stellen wir verschiedene Methoden Schritt für Schritt vor, damit Sie die für Ihre Anforderungen und Ihr Fachwissen beste Lösung auswählen können.
Arbeitsblätter einzeln als Neues Arbeitsblatt mit dem Befehl „Verschieben oder Kopieren“ speichern
Mithilfe des Befehls „Verschieben oder Kopieren“ können Sie ein oder mehrere Arbeitsblätter schnell in ein neues Arbeitsblatt verschieben oder kopieren.
Schritt 1: Wählen Sie den Arbeitsblattnamen aus der Tab-Leiste aus. Um mehrere Arbeitsblätter auszuwählen, halten Sie die „Strg“-Taste gedrückt und klicken nacheinander auf die gewünschten Blattregisterkarten.
Schritt 2: Klicken Sie mit der rechten Maustaste auf den Arbeitsblattnamen und wählen Sie im Kontextmenü „Verschieben oder Kopieren“.
Schritt 3: Wählen Sie im Dialogfeld „Verschieben oder Kopieren“ in der Dropdown-Liste „Ausgewählte Arbeitsblätter verschieben nach Arbeitsmappe“ den Eintrag „(neue Arbeitsmappe)“ aus.
Schritt 4: Klicken Sie anschließend auf „OK“. Sie wechseln nun zum neuen Arbeitsblatt mit den exportierten oder kopierten Inhalten. Wählen Sie „Datei“ > „Speichern“, um das neue Arbeitsblatt zu speichern.
Hinweis: Im Dialogfeld „Verschieben oder Kopieren“ finden Sie die Option „Eine Kopie erstellen“. Wenn Sie diese nicht aktivieren, werden die ausgewählten Arbeitsblätter aus der ursprünglichen Arbeitsmappe entfernt; wenn Sie sie aktivieren, werden die ausgewählten Arbeitsblätter kopiert.
Arbeitsblätter mühelos stapelweise als Neues Arbeitsblatt mit Kutools für Excel speichern
Wenn mehrere Arbeitsblätter als separate Arbeitsmappen gespeichert werden sollen, ist die erste Methode ungeeignet. Der folgende VBA-Code könnte für Excel-Anfänger etwas kompliziert sein. Stattdessen können Sie das Werkzeug „Arbeitsmappe trennen“ aus „Kutools für Excel“ nutzen, um jedes Arbeitsblatt einer Arbeitsmappe einfach und im Batch als separate Arbeitsmappe zu speichern.
Nach der Installation von Kutools für Excel klicken Sie auf „KUTOOLS PLUS“ > „Arbeitsmappe“ > „Arbeitsmappe trennen“, um das Dialogfeld „Arbeitsmappe trennen“ zu öffnen. Anschließend richten Sie es wie folgt ein.
- Markieren Sie die Arbeitsblätter, die Sie als neues Arbeitsblatt speichern möchten. Standardmäßig sind alle ausgewählt.
- Optional können ausgeblendete und leere Arbeitsblätter übersprungen werden, indem Sie die entsprechenden Kontrollkästchen im Abschnitt „Optionen“ aktivieren.
- Klicken Sie auf „OK“.
- Es öffnet sich das Dialogfeld „Ordner auswählen“. Wählen Sie nun einen Zielordner zum Speichern des neuen Arbeitsblatts aus und klicken Sie auf „Ordner auswählen“.
Anschließend werden die angegebenen oder alle Arbeitsblätter sofort als separate neue Arbeitsblätter gespeichert.
- Mit dieser Funktion speichern Sie jedes Arbeitsblatt ganz einfach als separate TXT-, CSV- oder PSF-Datei: Markieren Sie dazu das Kontrollkästchen „Speichern im Format“ und wählen Sie Ihre gewünschte Option aus der Dropdown-Liste.
- Um diese Funktion nutzen zu können, muss „Kutools für Excel“ auf Ihrem Computer installiert sein.Laden Sie Kutools für Excel jetzt herunter.
Arbeitsblätter als Neues Arbeitsblatt mit VBA-Code exportieren und speichern
Der folgende Code exportiert jedes sichtbare Arbeitsblatt in ein neues Arbeitsblatt und speichert die Arbeitsmappe unter dem Namen des ursprünglichen Blatts in einem neu erstellten Ordner am selben Speicherort wie die aktuelle Arbeitsmappe. Gehen Sie dazu wie folgt vor:
Schritt 1: Drücken Sie gleichzeitig die Tasten „ALT“ + „F11“, um das Fenster „Microsoft Visual Basic für Applikationen“ zu öffnen.
Schritt 2: Klicken Sie auf „Einfügen“ > „Modul“ und fügen Sie das folgende Makro in das Modulfenster ein:
VBA: Arbeitsblätter als neues Arbeitsblatt in einem neuen Ordner exportieren und speichern.
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 SubSchritt 3: Drücken Sie die Taste „F5“, um den Code auszuführen. Anschließend erscheint ein Hinweisfenster mit dem Speicherort der neu exportierten Arbeitsmappen. Alle Arbeitsblätter der ursprünglichen Arbeitsmappe wurden als separate neue Arbeitsmappen – jeweils benannt nach den Originalblättern – in einem neuen Ordner gespeichert.
Demo: Jedes Blatt als Neues Arbeitsblatt exportieren und speichern
Verwandte Artikel:
- Mehrere Arbeitsmappen zu einer einzelnen Arbeitsmappe zusammenführen
- Eine Auswahl als einzelne Datei speichern
- Eine Arbeitsmappe in separate Excel-Dateien aufteilen
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins