Hallo ZUsammen,
Ich will Daten von Excel nach Word exportieren.
Dazu haben ich folgenden Code ausfindig gemacht:
On Error Resume Next
Set wd = GetObject(, „Word.Application“)
If wd Is Nothing Then
’ …oder neu erstellen
Set wd = CreateObject(„Word.Application“)
wd.Visible = True
End If
’ Word in den Vordergrund
AppActivate wd.Caption
’ Neues Dokument
Set dok = wd.Documents.Add(g_Vorlage)
Der funktionierte zunächst perfekt. Aber seit neuestem passiert folgendes: Wenn Word offen ist, funktioniert es einwandfrei. Wenn Word noch nicht offen ist, wird Word zwar geöffnet, aber kein Dok angezeigt und Word inkl. die Funktion „Neues Dok“ ist blockiert…
Kann mir einer sagen, was da passiert…??? Muss ich eine Einstellung bei Word ändern? oder den Code…???
PLease comment. Danke im voraus
Axel