Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: vba csv Datei öffnen als tabelle

vba csv Datei öffnen als tabelle
20.02.2018 17:04:39
Erik
Hallo zusammen,
ich habe folgenden VBA Code:
Sub csv_import()
Dim wb As Workbook
Dim lngZ As Long
Dim strFileName
Dim strFilter As String
ChDrive "Z"
ChDir "\Test\" & "\Downloads\"
strFilter = "csv Dateien(*.csv*), *.csv*"
strFileName = Application.GetOpenFilename(strFilter)
If strFileName = False Then Exit Sub
Set wb = Workbooks.Open(strFileName)
wb.Activate
End Sub
es soll eine csv geöffnet werden, allerdings mit Trennzeichen ","
diese wird auch geöffnet aber nicht in Spalten gesplittet sondern alles in einer Spalte mit , getrennt.
Was muß ich am Code ändern damit zwischen jedem "," eine Spalte gesetz wird
Gruß
Erik
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba csv Datei öffnen als tabelle
21.02.2018 09:00:20
Erik
Hallo Chris,
und wo genau muß:
, Local:=True
hin ?
Danke und Gruß
Erik
Anzeige
AW: vba csv Datei öffnen als tabelle
21.02.2018 10:22:50
ChrisL
Hi Erik
Sub csv_import()
Dim wb As Workbook
Dim varFileName As Variant
Dim strFilter As String
ChDrive "Z"
ChDir "\Test\Downloads\"
strFilter = "csv Dateien(*.csv*), *.csv*"
varFileName = Application.GetOpenFilename(strFilter)
If varFileName = False Then Exit Sub
Set wb = Workbooks.Open(varFileName, Delimiter:=",")
End Sub
cu
Chris
Anzeige
AW: vba csv Datei öffnen als tabelle
22.02.2018 09:18:11
Erik
Hallo Chris,
vielen Dank!
Gruß
Erik
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

CSV-Datei in Excel mit VBA öffnen und korrekt formatieren


Schritt-für-Schritt-Anleitung

Um eine CSV-Datei mit VBA zu öffnen und sicherzustellen, dass die Daten in den einzelnen Spalten korrekt angezeigt werden, kannst du folgenden VBA-Code verwenden:

Sub csv_import()
    Dim wb As Workbook
    Dim varFileName As Variant
    Dim strFilter As String
    ChDrive "Z"  ' Laufwerk wechseln
    ChDir "\Test\Downloads\"  ' Verzeichnis setzen
    strFilter = "csv Dateien(*.csv*), *.csv*"

    ' Datei-Dialog zur Auswahl der CSV-Datei
    varFileName = Application.GetOpenFilename(strFilter)
    If varFileName = False Then Exit Sub

    ' CSV-Datei mit Trennzeichen "," öffnen
    Set wb = Workbooks.Open(varFileName, Delimiter:=",")
End Sub

Dieser Code öffnet eine CSV-Datei und splittet die Daten bei jedem Komma in separate Spalten. Stelle sicher, dass dein Excel ordnungsgemäß konfiguriert ist, um die CSV-Datei richtig zu interpretieren.


Häufige Fehler und Lösungen

  • Problem: Die CSV-Datei wird nicht richtig in Spalten aufgeteilt.

    • Lösung: Achte darauf, dass das richtige Trennzeichen (z. B. Delimiter:=",") im Code angegeben ist.
  • Problem: Fehlermeldung beim Öffnen der Datei.

    • Lösung: Überprüfe den Dateipfad und die Berechtigungen. Stelle sicher, dass die Datei existiert und dass du auf das Verzeichnis zugreifen kannst.
  • Problem: Die Daten erscheinen in einer einzigen Spalte.

    • Lösung: Vergewissere dich, dass du den Delimiter korrekt gesetzt hast. Siehe den oben genannten Code.

Alternative Methoden

Falls du die CSV-Datei nicht über VBA öffnen möchtest, kannst du sie auch direkt über Excel öffnen:

  1. Öffne Excel.
  2. Klicke auf "Daten" > "Daten abrufen" > "Aus Datei" > "Aus Text/CSV".
  3. Wähle die gewünschte CSV-Datei aus und klicke auf "Importieren".
  4. Wähle das passende Trennzeichen aus und klicke auf "Laden".

Diese Methode ist einfach und benötigt kein VBA.


Praktische Beispiele

  1. CSV mit verschiedenen Trennzeichen: Wenn deine CSV-Datei ein anderes Trennzeichen (z. B. Semikolon) verwendet, ändere den Delimiter im Code:

    Set wb = Workbooks.Open(varFileName, Delimiter:=";")
  2. CSV-Datei bearbeiten: Nach dem Öffnen kannst du die Daten wie gewohnt in Excel bearbeiten, z. B. durch Formeln oder Formatierungen.


Tipps für Profis

  • Verwende die Workbook_Open-Methode, um die CSV-Datei zu importieren, wenn du das Arbeitsbuch öffnest.
  • Automatisiere den Import von CSV-Dateien, indem du mehrere Dateien in einer Schleife einliest.
  • Nutze die FileDialog-Methode für eine benutzerfreundliche Dateiauswahl.

FAQ: Häufige Fragen

1. Wie kann ich eine CSV-Datei mit mehreren Trennzeichen öffnen?
Aktuell unterstützt der Workbooks.Open-Befehl nur ein Trennzeichen. Du müsstest die Datei zuerst bearbeiten oder ein Makro schreiben, um sie anzupassen.

2. Kann ich eine CSV-Datei auch ohne Excel öffnen?
Ja, du kannst CSV-Dateien auch mit Texteditoren oder speziellen CSV-Editoren öffnen. Excel bietet jedoch die besten Möglichkeiten zur Bearbeitung und Analyse.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige