Makro Word Datei öffnen als Serienbrief
20.12.2020 16:52:48
Maik
Ich habe eine Exceldatei in der Ich eine große Tabelle habe.
In einen zweiten Tabellenblatt habe ich ein Dropdownfeld hier suche ich den Namen aus Blatt 2 aus und schreibe den Rest der Daten wia SVERWEIS in eine Zeile.
Nun wollte ich in einem neuen Tabellenblatt eine Makro Schaltfläche implementieren.
Mit der möchte ich eine Word Datei öffnen die wia Seriebrief meine Daten einträgt.
Wenn ich jetzt die Word selber öffne finde ich die Daten
Öffne ich Sie übers Makro ist die Tabelle nicht mehr hinterlegt und ich muss sie immer neu verknüpfen.
Kann man das ändern. Am liebsten wäre es mir wenn der Datensatz gleich eingetragen wird und ich den Pfad Relativ mit einem Unterordner machen könnte.
Auch sollte die Word Datei gleich in den Vordergrund und nicht erst von der Taskleiste aufgerufen werden.
Sub test()
Dim AppWD As Object
Set AppWD = CreateObject("Word.Application") 'Word als Object starten
AppWD.Visible = True
AppWD.documents.Open "D:\Arbeit\test\Datenbank neu\Dokumente\Bestätigung.docx"
End Sub
Die Excel liegt in "Datenbank neu"
Danke und einen schönen 4ten Advent