Herbers Excel-Forum - das Archiv

Einlesen txt Datei

Bild

Betrifft: Einlesen txt Datei
von: Fraggle
Geschrieben am: 26.09.2003 16:16:09
Hallo,

ich möchte mittels VBA-Routine aus einer Text-Datei, die durch Semikolon getrennte Werte enthält, in eine bestehende Tabelle (Worksheet "Stamm") in einer Spalte einlesen (Zellen E1:E40). Dabei soll der Nutzer die Möglichkeit haben, aus Excel heraus die einzulesenden Daten (es bestehen viele Text-Dateien) mittels "Explorer-Menü" (wie z.B. beim Import von Daten) aus dem entsprechenden Verzeichnis auszuwählen.

Danke für Eure kurzfristige Hilfe,
Fraggle

Bild

Betrifft: AW: Einlesen txt Datei
von: ChrisL
Geschrieben am: 26.09.2003 17:05:34
Hi Fraggle

Hier mal ein Ansatz zum Öffnen. Den Kopiervorgang müsstest du mit dem Makrorekorder erreichen können.

Sub Holger()
Dim fFile
ChDir "C:\PFAD"
fFile = Application.GetOpenFilename("Text-Dateien (*.txt), *.txt")
If fFile = False Then Exit Sub
Workbooks.OpenText FileName:=fFile
End Sub



Gruss
Chris
Bild

Betrifft: AW: Einlesen txt Datei
von: Fraggle
Geschrieben am: 26.09.2003 17:24:32
Vielen Dank schonmal, ich werde ein bisschen basteln, hab schon was erreicht und dann hier einstellen.
 Bild
Excel-Beispiele zum Thema " Einlesen txt Datei"
Tabellenblattnamen in ein Listenfeld einlesen Gefilterte Daten in eine ListBox einlesen
Einlesen von Zellinhalten in Variablen 1000 Arbeitsblätter aus 1000 Arbeitsmappen einlesen
Tabellenblattnamen in eine ListBox einlesen Text aus UserForm-Textbox in Variable einlesen
Blätter in ComboBox-Feld einlesen und auswählen Dateinamen in Tabelle einlesen
Namen einer Arbeitsmappe einlesen