mit Bookmarks Word-Vorlagen ausfüllen
23.07.2020 20:44:56
Kati
ich habe mehrere Word-Vorlagen mit Bookmarks. Die Basisdaten befinden sich in Excel, genauso wie eine Liste mit den Word-Dateinamen (inkl. Pfad). Ich möchte gerne, dass alle Word-Dateien auf "Knopfdruck" ausgefüllt werden. Insofern ich nur eine Datei ausfüllen lasse klappt das super, aber ich weiß leider nicht, wie ich den Code in VBA so schreibe, dass das Makro alle Dateien ausfüllt.
Kann mir zufällig jmd. helfen? Das wäre echt super.... Danke.
Liebe Grüße
Kati
______________________________
Als Code habe ich den folgenden:
Option Explicit
Sub Word_ausfüllen ()
Dim AppWord As Object
Set AppWord = CreateObject("Word.application")
With AppWord
.Visible = True: .WindowState = xlNormal
.Documents.Add Range("B39") & Range("C39")
.ActiveDocument.Bookmarks("Name").Range.Text = Range("B6")
.ActiveDocument.Bookmarks("Vorname").Range.Text = Range("B7")
.ActiveDocument.Bookmarks("Straße").Range.Text = Range("B8")
End With
Set AppWord = Nothing
End Sub