Office: Textdatei zeilenweise zum Auswerten einlesen

XLS2010

Ich kriege aus einem Gerät eine Logdatei im ASCII-Format, in der zwei Informationssätze stehen die ich per XLS/VBA auswerten und umsortieren will.

Im Teil A stehen Start- und Stopdaten für eine Funktion B, in diesem Fall sogar in einer Zeile. Im zweiten Teil stehen Start/Stop-Zeitstempel für eine Funktion B, leider nicht unbedingt in einer Zeile. Beispiel siehe Datei in der Anlage. Deswegen geht der direkte Import über die Assistenten nicht.

Ich brauche jetzt einen Ansatz die Textdatei zu öffnen und zeilenweise auszulesen um den String abzuspeichern. Sobald ich den String im Input habe, komme ich weiter.

Mfg Rolfie

:)

 

Hallo,

falls ich es richtig verstanden habe, lädt der Code die Datei ein:

PHP:

         Sub iLesen()
sPath = "c:\temp\"
sFile = "Log.txt"

Open sPath & sFile For Input As #1

Do Until EOF(1)
Line Input #1, Tx
i = i + 1
Cells(i, "A") = Tx
Loop

Close #1
End Sub


 

Thema erledigt, habe alten Code gefunden mit dem ich etwas ähnliches bereit gemacht habe. Import läuft ohne PHP.

Mfg Rolfie