steve: txt & Word

Beitrag lesen

Danke für eure Antworten!
Ich hab jetzt mit eurer Hilfe einen Code gebastelt der sogar funktioniert. Nur weiß ich nicht, wie man eine Zahl zu einem String hinzufügt?!
weiß das wer von euch?

So sieht dann der Code aus:

Sub AutoExec()
'
' Declarationen.AutoExec Makro
' Makro erstellt am 27.07.2007 von Ferialpraktikant SIA2
'
i = 0
Open "C:/Daten.txt" 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
    ActiveDocument.FormFields("Text" mit Variable i verknüpfen).Result = Dateidaten

End If
  Line Input #1, Dateidaten    ' Datenzeilen lesen.
  i = i + 1
Loop
Close #1    ' Datei schließen.

End Sub

mfg