Öffnen von Word-Datei aus Excel schließ Word
26.10.2023 15:18:46
Beelzenz
ich habe eine Excel-Arbeitsmappe erstellt, die mir per Makro eine Worddatei öffnet und definierte Inhalte dort an entsprechenden Bookmarks einfügt.
Das ist der entsprechende Teil des Codes:
'Wordvorlage öffnen
Set objWord = CreateObject("word.application")
objWord.Visible = True
Set objDoc = objWord.Documents.Open(FileName:=Dateiname)
'Daten kopieren
Inhalt2.Copy
objDoc.bookmarks("Inhalt").Range.Paste
Kunde.Copy
objDoc.bookmarks("Adresse").Range.Paste
Mein Problem ist nun, dass das manchmal super funktioniert und manchmal Word beim ausführen der 3. Code-Zeile
Set objDoc = objWord.Documents.Open(FileName:=Dateiname)einfach geschlossen wird. Ich habe viel rumprobiert und kann beim besten Willen keine Ursache vermuten, warum es manchmal funktioniert und manchmal nicht.
Ich hoffe jemand von euch kann mir weiterhelfen und hat hier eine Idee. Falls dafür mehr Infos benötigt werden liefere ich die natürlich gern :)
Dankeschonmal und Grüße
B