txt & Word

[steve]

ich hab jetzt nen Algorithmus gefunden, der mir Zeile für Zeile aus einer Texdatei auslest (hoffe er stimmt auch^^):

Sub AutoExec()
'
' Declarationen.AutoExec Makro
' Makro erstellt am 27.07.2007 von Ferialpraktikant SIA2
'
i = 0
Open "DATEINAME" For Input As #1    ' Datei zum Einlesen öffnen.
Do While Not EOF(1)    ' Auf Dateiende abfragen.
  If i > 1 Then
    'hier in das Formular schreiben
  End If
  Line Input #1, Dateidaten    ' Datenzeilen lesen.
  i = i + 1
Loop
Close #1    ' Datei schließen.

End Sub

Nur jetzt steh ich wieder vor dem Problem wie ich die Zeilen in die einzelnen Textformularfelder einfüge!

Ich hab gegoogelt, aber nichts dazu gefunden...
Habt ihr Profis vl eine Lösung?

mfg steve