Danke ihr beiden. Der code von BigBen funktioniert jetzt.
Allerdings verstehe ich ihn noch immer nicht wirklich. Deshalb hier die nächste Palette Fragen:
Muss ich das Formfield im Word irgendwie benennen? Bzw wo "ziele" ich, welches ich beschrfiten lasse?
Ich versteh im spezielle das hier nicht:
Set ctrlText1 = SearchContentControl(wrdDoc, "Text1")
If Not ctrlText1 Is Nothing Then
ctrlText1.Range.Text = "Test erfolgreich"
End If
Function SearchContentControl(Doc As Word.Document, Tag As String) As Word.ContentControl
Dim ctrl As Word.ContentControl
For Each ctrl In Doc.ContentControls
If ctrl.Tag = Tag Then
Set SearchContentControl = ctrl
Exit For
End If
Next
End Function
Wieso kann ich es nicht irgendwie so machen?
wrdDoc.FormFields("Text1").Range.Text = "erfolgreich"
Ich möchte unter anderem den Briefkopf des Dokuments füllen. Dazu ,üsste ich wissen, wie ich welches Formfield anspreche, also auch, wie dich die Word-Datei richtig erstelle.
Gerne können wir auch mal über Skype schreiben, das behebt das Problem vielleicht schneller?
|