Word Serienbrief aus Excel erstellen - Problem!
04.09.2004 01:45:30
ThomasJ
Habe folgendes Prob:
Ich öffne die Serienbrief-Funktion von Word mit einem CB einer UF aus Excel.
Wenn ich WORD dann aber schliessen will, bekomme ich n Haufen Meldungen und Abfragen bezüglich Normal.dot:
1. ..andere Anwendung oder Benutzer greifen auf ...Normal.dot zu!
2. SaveAs Dialog -> Normal.dot
3. WORD immer noch offen -> drücke Schließen (X)
4. Änderungen wirken sich auf Normal.dot aus...blabla...
Hier der Code (zusammengebastelt aus verschiedenen Fundstellen):
Sub ÖffneWord()
Dim wrd As Object
Set wrd = CreateObject("Word.Application")
wrd.Visible = True
wrd.documents.Add
wrd.activedocument.mailmerge.showwizard (2)
Set wrd = Nothing
End Sub
Kann mir da jemand helfen?!
Gruß
Thomas