Textdatei auslesen



Excel-Version: Office 97
nach unten

Betrifft: Textdatei auslesen
von: Frederic Cormann
Geschrieben am: 09.07.2002 - 13:43:07

Ich brauche noch mal gerade kurz Hilfe!

Wie kann ich aus einer Textdatei nur den Inhalt der 3. Zeile
in eine bestimmte Zelle z.b: B3 einlesen?

Bin dankbar für jeden Rat, stehe im Moment auf der Stelle und
komme mit meinem Projekt nicht voran

nach oben   nach unten

Re: Textdatei auslesen
von: Michael Schefffler
Geschrieben am: 09.07.2002 - 13:52:36

Hallo,

die Hilfe leicht abgewandelt:


Dim Textzeile
Dim Zaehler
Zaehler = 1
Open "DATEI1" For Input As #1    ' Datei öffnen.
Do While Not EOF(1)    ' Schleife bis Dateiende.
    Line Input #1, Textzeile    ' Zeile in Variable einlesen.
    If Zaehler = 3 Then Worksheets("Tabelle1").Cells(3, 2). = Textzeile    
     Zaehler  = Zaehler +1 
Loop
Close #1    ' Datei schließen.



 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Textdatei auslesen"