Word Formularfeld beschreiben aus Excel
25.09.2022 13:15:29
Andreas
ich habe mir eine Vorlage auf Word erstellt (dotx), die ich mit nachfolgendem Code beschreiben wollte.
Ich habe dazu zunächst Textmarken eingegen, mt denen hat das Beschreiben funktioniert.
Jetzt habe ich die Textmarken mt Formularfeldern getauscht (auch in den Eigenschaften Textmarke entsprechend benannt.
Jetzt erscheint Laufzeeitfehler 462.
Muss ich beim Beschreiben von Formularfeldern etwas anders machen ?
Private Sub Test()
Dim appWord As Word.Application
Dim objDocument As Word.Document
'Anwendung Word starten
Set appWord = CreateObject("Word.Application")
'Wordn sichtbar machen
appWord.Visible = True
'Word-Dokument öffnen
Set objDocument = appWord.Documents.Open(Filename:="D:\Aufwand.dotx")
With objDocument
.Bookmarks("Nachname").Range.text = Textbox1.text
.Bookmarks("Vorname").Range.text = Textbox1a.text
.Bookmarks("Datum").Range.text = Date
End With
End Sub
Anzeige