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:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | 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?
|