Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

@Coros Betr.:csv-Datei importieren





Frage

[quote]Antwort von coros vom 18.01.2006, 10:50 Option Explicit Sub Alle_CSV_Dateien_oeffnen() Dim CSV_Dateiname As String, Pfad As String Application.ScreenUpdating = False Pfad = "C:\\Dein Ordner\" CSV_Dateiname = Dir(Pfad & "*.csv") Do While Dateiname <> "" Workbooks.Open Pfad & CSV_Dateiname Dateiname = Dir Loop End Sub [/quote] Hallo Oliver, habe das folgende Makro im Archiv gefunden. Hier wird die csv-Datei beim importieren zeilenweise ausgegeben. Könnte es auch so geändert werden, dass die Ausgabe in der Tabelle spaltenmäßig eingetragen wird und wenn ja - Wie? MfG Odje

Antwort 1 von coros

Hallo Odje,

Du hast einen schlechten Betreff gewählt. Da Du mich persönlich ansprichst, könnte es sein, dass niemand anderes darauf antwortet. Da ich aber nich täglich hier im Forum unterwegs bin, kann es sein, dass Du gar keine Antwort bekommst. Daher wähle nächstes mal einen neutraleren Betreff.

Zu dem Makro. Mit dem Makro werden keine Zeilen eingelesen. Damit wird eine bzw. mehrere CSV-Datei geöffnet. Mehr nicht. Wenn Du nur Spalten haben möchtest, dann musst Du unter "Daten => externe Daten importieren => Daten importieren..." Deine CSV-Datei auswählen. Im Schritt 2 des Textkonvertierungsassistenten gibst Du an, bei welchem Zeichen die Daten getrennt werden sollen (meistens das Komma oder das Semikolon) und in Schritt 3 hast Du die Möglichkeit zu sagen, welche Spalten eingefügt und welche nicht eingefügt werden sollen.
Wenn Du das Ganze als Makro haben möchtest, dann zeichne Dir den Ablauf mit dem Makrorekorder auf.

Ich hjoffe, ich konnte Dir weiterhelfen. Ebentuell liege ich mit meiner Beschreibung auch total daneben, weil ich Deine Frage falsch verstanden habe?
Bei Fargen melde Dich wieder.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: