Office: mit VBA externe txt-Datei durchsuchen

Hallo,

ich habe mal eine Frage, ich habe diese Aufgabe vorher in Excel geloest, nun reichen mir die Excel-Zeilen aber nicht mehr aus... :-( ...muss also outsourcen :-)

Folgendes Problem: Ich habe eine Logfile, die jetzt ueber 65.000 Zeilen hat, deswegen kann ich sie nicht mehr nach Excel importieren.
Die logfile muss also als externe txt-Datei behandelt werden.

Diese Logfile moechte ich nun durchsuchen und jede Zeile, die "Element1" und "Element2" enthaelt zaehlen und das Ergebnis dann in eine bestimmte Zelle (z.B. 5,4) in meinem Excel-Report eintragen.
(Die Elemente sind jeweils Zahlenkombinationen.)

Ich weiss, dass man mit VBA externe txt-Dateien ansteuern und auslesen kann, habe aber keine Ahnung, wie man dann mit oben genannten Kriterien sucht!

HERZLICHEN DANK!!!!!
JVLennox

 

Hab nen Tip bekommen:
eigentlich gar nicht so kompliziert...

Code:

Sub LogDateiLesen()
    Dim zeile, anz
    Open "C:\Daten\Datei.log" For Input As 1
    While Not EOF(1)
        Line Input #1, zeile
        If InStr(zeile, "Element1") > 0 AND InStr(zeile, "Element2") > 0 Then anz = anz + 1
    Wend
    Close
    Cells(5, 4) = anz 'Ausgabe in Zelle D5
End Sub

DANKE an alle!!!