Hallo Leute,
Dim wrdFileName As String
Dim wrdDokument As Word.Document
wrdFileName = "C:\Winnt\Profiles\Administrator\Desktop\Eigene Dateien\BriefBeta\xlBrief.dot"
Set wrdDokument = GetObject(wrdFileName)
bookmarkVorname(1) = "Vorname"
Set wrdDokument = GetObject(wrdFileName)
wrdDokument.Bookmarks(bookmarkVorname(1)).Select
wrdDokument.Application.Selection.Text = TBVorname.Value
wrdDokument.Bookmarks.Add _
Range:=wrdDokument.Application.Selection.Range, _
Name:=bookmarkVorname(1)
...
mit dem o. g. Listing, übertrage eine bestimmte Adresse an Word. Das funktioniert auch alles Prima, nur jetzt möchte ich das Word mit der Datei (xlBrief) gestartet wird. Wie muss ich das Listing abändern? Die Adresse wird in die Datei Dokument1 geschrieben.
Vielen erzlichen Dank
Thomas Weiss