29. März 2024, 07:23
VB-fun.de - Beitragsübersicht zum VB-/VBA-Forum-Archiv 0406
  E00: Problem beim Konvertíeren von csv-Dateien
 Von Cicco
 eMail
 Am 26. März 2008 um 12:23:42
 Frage Hallo zusammen,

ich habe ein kleines Problem wenn ich csv-Dateien per VBA in Excel öffne.

Wenn ich meine csv-Datei ohne VBA ganz normal aus einer bestehenden Excel-Instanz über Datei ==> Öffnen aufmache wird die csv-Datei (Semikolon getrennte Werte) korrekt dargestellt.
Versuche ich das über Code "Workbooks.Open" funktioniert die Darstellung in Spalten nicht.

Ich kann es korrekt ausführen wenn ich eine neue Arbeitsmappe einfüge und die csv-Datei dann importiere:
Workbooks.Add(1)
With ActiveSheet.QueryTables.Add(Connection:="C:\Test.csv", Destination:=Range("A1"))
'etc.
Mein Problem ist jetzt dass die nue erstellte Arbeitsmappe "Tabelle1" heißt, und nicht den Namen aus der importierten csv-Datei erhält.

Gibt es eventuell eine Möglichkeit die csv mit "Workooks.Open" so zu öffnen dass die Spalten korrekt dargestellt werden, dann hätte ich das Namensproblem nicht.

Oder gibt es alternativ eventuell die Möglichkeit einer mit "Workbooks.Add" neu hinzugefügten Arbeitsmappe einen Namen vorzugeben. Die Datei soll aber nicht gespeichert werden, dass muss manuell geschehen, darum scheidet "SaveAs" oder "GetSaveAs" aus, die neue Arbeitsmappe soll halt nur statt "Tabelle1" einen Namen haben der aus einer Variablen (Name der csv-Datei) kommt.

Vielen Dank für Eure Hilfe

Gruß cicco
[ VB-/VBA-Forum | Archiv 0406 | Archiv-Übersicht ]
 Antworten
E00: Problem beim Konvertíeren von csv-Dateien - Cicco 26. März 2008 um 12:23:42
Lösung RE: Problem beim Konvertíeren von csv-Dateien - cicco 26. März 2008 um 14:25:05

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB-/VBA-Forum | DirectX | DirectX-Forum | VB.Net | VB.Net-Forum | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum