Nur bestimmte Spalten in CSV exportieren
Schritt-für-Schritt-Anleitung
Um nur bestimmte Spalten aus einer Excel-Datei als CSV zu exportieren und die Spaltenüberschriften zu beeinflussen, kannst du den folgenden VBA-Code verwenden:
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Wähle "Einfügen" > "Modul", um ein neues Modul zu erstellen.
- Kopiere den folgenden Code in das Modul:
Sub export_selected_Range_and_save_as_CSV()
Dim i As Integer, n As Integer
Dim maxExpCol As Integer
Dim expFolder As String, expFileName As String
Dim myDiv As String, tmpExpText As String, expText As String
maxExpCol = 25
expFolder = "C:\Temp\"
expFileName = "Export.csv"
myDiv = ";"
Dim startRow As Integer, selRow As Integer, selCol As Integer
startRow = 1 ' oder wähle die gewünschte Startzeile
selRow = Range("A65536").End(xlUp).Row
For i = startRow To selRow
tmpExpText = ""
' Hier die zu exportierenden Spalten eintragen
For Each Spaltenarray In Array("B", "C", "D")
StartCol = Range(Spaltenarray & "1").Column
tmpExpText = tmpExpText & Cells(i, StartCol).Text & myDiv
Next Spaltenarray
expText = expText & tmpExpText & vbCrLf
Next i
expFileName = Application.GetSaveAsFilename(InitialFileName:=expFolder & expFileName, _
fileFilter:="CSV Files (*.csv), *.csv", Title:="Exportpfad definieren")
Open expFileName For Output As #1
Print #1, expText
Close #1
MsgBox "Daten exportiert"
End Sub
- Passe den Pfad und den Dateinamen nach Bedarf an.
- Führe das Makro aus, um die Daten als CSV zu exportieren.
Häufige Fehler und Lösungen
Alternative Methoden
Falls du keine VBA-Programmierung nutzen möchtest, kannst du auch die Funktion "Speichern unter" verwenden:
- Wähle die gewünschten Spalten in Excel aus.
- Kopiere die Auswahl (Strg + C).
- Öffne ein neues Excel-Dokument und füge die Daten dort ein.
- Speichere das neue Dokument als CSV-Datei über "Datei" > "Speichern unter" und wähle das CSV-Format aus.
Praktische Beispiele
Angenommen, du hast eine Excel-Datei mit den Spalten A bis D, und du möchtest nur die Spalten B, C und D exportieren. Der oben angegebene VBA-Code ermöglicht es dir, diese spezifischen Spalten einfach zu exportieren, indem du das Array in der Schleife anpasst.
Tipps für Profis
-
Spaltenüberschriften anpassen: Du kannst die ersten Zeilen deines exportierten Textes anpassen, um benutzerdefinierte Spaltenüberschriften zu definieren. Füge einfach eine zusätzliche Zeile vor der Schleife hinzu, die expText initialisiert.
-
Automatisierung: Du kannst das Makro so anpassen, dass es automatisch bei jedem Öffnen der Datei ausgeführt wird, um regelmäßig bestimmte Daten zu exportieren.
FAQ: Häufige Fragen
1. Kann ich auch mehr als drei Spalten exportieren?
Ja, du kannst die Anzahl der Spalten im Array anpassen, um beliebig viele Spalten zu exportieren.
2. Funktioniert dieser Code in Excel 2016?
Ja, der VBA-Code ist mit Excel 2016 und neueren Versionen kompatibel. Achte darauf, die Makros in den Excel-Optionen zu aktivieren.