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

Beiträge aus den Excel-Beispielen zum Thema " Einlesen txt Datei"