Wie kombiniert oder importiert man mehrere CSV-Dateien in jeweils eigene Arbeitsblätter?
Wie können Sie mehrere CSV-Dateien aus einem Ordner als separate Arbeitsblätter innerhalb einer Arbeitsmappe in Excel importieren?
Importieren mehrerer CSV-Dateien in separate Arbeitsblätter mit VBA-Code
Importieren mehrerer CSV-Dateien in separate Arbeitsblätter mit Kutools für Excel
Eine Arbeitsmappe in mehrere separate CSV-/PDF-/TXT-/Excel-Dateien-Dateien aufteilen
Importieren mehrerer CSV-Dateien in separate Arbeitsblätter mit VBA-Code
Um mehrere CSV-Dateien schnell in eine Arbeitsmappe zu importieren, hilft Ihnen der folgende VBA-Code. Gehen Sie dazu wie folgt vor:
1. Halten Sie in Excel die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code im Modul-Fenster ein.
VBA-Code: Importieren mehrerer Textdatei in separate Arbeitsblätter:
Sub CombineCsvFiles()
'updateby Extendoffice
Dim xFilesToOpen As Variant
Dim I As Integer
Dim xWb As Workbook
Dim xTempWb As Workbook
Dim xDelimiter As String
Dim xScreen As Boolean
On Error GoTo ErrHandler
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
xDelimiter = "|"
xFilesToOpen = Application.GetOpenFilename("Text Files (*.csv), *.csv", , "Kutools for Excel", , True)
If TypeName(xFilesToOpen) = "Boolean" Then
MsgBox "No files were selected", , "Kutools for Excel"
GoTo ExitHandler
End If
I = 1
Set xTempWb = Workbooks.Open(xFilesToOpen(I))
xTempWb.Sheets(1).Copy
Set xWb = Application.ActiveWorkbook
xTempWb.Close False
Do While I < UBound(xFilesToOpen)
I = I + 1
Set xTempWb = Workbooks.Open(xFilesToOpen(I))
xTempWb.Sheets(1).Move , xWb.Sheets(xWb.Sheets.Count)
Loop
ExitHandler:
Application.ScreenUpdating = xScreen
Set xWb = Nothing
Set xTempWb = Nothing
Exit Sub
ErrHandler:
MsgBox Err.Description, , "Kutools for Excel"
Resume ExitHandler
End Sub
3. Drücken Sie anschließend die Taste F5, um diesen Code auszuführen. Es öffnet sich ein Fenster – navigieren Sie zum entsprechenden Ordner und wählen Sie die CSV-Dateien aus, die Sie in Excel importieren möchten. Siehe Screenshot:
4. Klicken Sie dann auf die Schaltfläche Öffnen, um die ausgewählten CSV-Dateien als separate Arbeitsblätter in ein neues Arbeitsblatt zu importieren.
5. Abschließend können Sie das neue Arbeitsblatt nach Bedarf speichern.
Importieren mehrerer CSV-Dateien in separate Arbeitsblätter mit Kutools für Excel
Wenn Sie Kutools für Excel installiert haben, können Sie mit dem leistungsstarken Werkzeug Kombinieren schnell mehrere CSV-Dateien je nach Bedarf in ein einzelnes oder in mehrere separate Arbeitsblätter zusammenführen bzw. importieren.
Nach der Installation von Kutools für Excelgehen Sie bitte wie folgt vor:
1. Klicken Sie bitte auf KUTOOLS PLUS > Kombinieren. Siehe Screenshot:
2. Im Dialogfeld Arbeitsblätter konsolidieren wählen Sie bitte Arbeitsblätter von mehreren Arbeitsmappen in eine Arbeitsmappe kopieren. Siehe Screenshot:
3. Im Schritt 2 des Assistenten klicken Sie auf Hinzufügen > Datei, um die CSV-Dateien auszuwählen, die Sie kombinieren möchten. Siehe Screenshot:
4. Wählen Sie im erscheinenden Dialogfeld Öffnen im Dropdown-Menü (*.csv) aus und geben Sie dann die CSV-Dateien an, die Sie zusammenführen möchten.
5. Klicken Sie dann auf die Schaltfläche Öffnen, und Ihre ausgewählten CSV-Dateien werden in das Dialogfeld importiert. Siehe Screenshot:
6. Führen Sie im Schritt 3 bitte die folgenden Aktionen durch:
(1.) Aktivieren Sie das Kontrollkästchen In der ersten Zeile jedes Arbeitsblatts (als Kommentare)im Abschnitt Arbeitsblattinformationen hinzufügen, damit alle Informationen zu den CSV-Dateien als Kommentare in die kombinierten Blätter eingefügt werden;
(2.) Sie können die CSV-Dateien nach Bedarf umbenennen;
(3.) Überspringen Sie leere CSV-Dateien, sobald Sie auf eine stoßen.
7. Klicken Sie anschließend auf die Schaltfläche Fertigstellen und geben Sie nach Abschluss des Zusammenführens einen Dateinamen sowie einen Speicherort für Ihre neue kombinierte Arbeitsmappe an. Siehe Screenshot:
8. Klicken Sie anschließend auf die Schaltfläche Speichern. Im erscheinenden Bestätigungsdialog können Sie die generierte Datei öffnen, indem Sie auf Ja klicken, oder schließen, indem Sie auf Nein klicken. Siehe Screenshot:
9. Anschließend können Sie dieses Szenario entweder speichern oder auch nicht speichern. Siehe Screenshot:
10. Schließlich wurden Ihre ausgewählten CSV-Dateien in ein neues Arbeitsblatt mit separaten Tabellen importiert. Siehe Screenshot:
Laden Sie Kutools für Excel jetzt herunter und testen Sie es kostenlos!
Eine Arbeitsmappe in mehrere separate CSV-/PDF-/TXT-/Excel-Dateien-Dateien aufteilen
In bestimmten Fällen möchten Sie Ihre Arbeitsmappe möglicherweise in separate CSV-Dateien aufteilen – das Hilfsprogramm „Arbeitsmappe trennen“ von Kutools für Excel erledigt diese Aufgabe schnell und mühelos.
Nach der Installation von Kutools für Excelgehen Sie bitte wie folgt vor:
1. Klicken Sie auf KUTOOLS PLUS > Arbeitsmappe > Arbeitsmappe trennen. Siehe Screenshot:
2.Im Dialogfeld Arbeitsmappe trennen:
(1.) Markieren Sie die Arbeitsblätter, die Sie aufteilen möchten;
(2.) Aktivieren Sie das Kontrollkästchen Speicherformatfestlegen, und wählen Sie das gewünschte Dateityp zum Speichern aus;
(3.) Klicken Sie dann auf die Schaltfläche Aufteilen und geben Sie einen Ordner an, in dem die separaten Dateien gespeichert werden sollen.
3. Klicken Sie anschließend auf OK, um mit dem Aufteilen zu beginnen. Die Arbeitsmappe wird in die gewünschten separaten CSV-Dateien aufgeteilt.
Laden Sie Kutools für Excel jetzt herunter und testen Sie es kostenlos!
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