aus Access automatisiert ein Word-Dokument mit einer Datenquelle verbindenn

Tom Krist 0 Zuverlässigkeitspunkte
2024-03-26T08:08:14.4866667+00:00

Hallo

ich habe bereits mehrfach aus einer Access-DB heraus ein Word-Dokument geöffnet und dieses mit einer Datenquelle automatisiert verbunden. Das war bisher immer dieselbe DB.

Um den inhaltlichen Zusammenhang zu wahren, will ich dieses Mal einen ähnlichen Ablauf in einer anderen DB einrichten. Dabei wird allerdings immer der Fehler

4198: Befehl misslungen

ausgelöst.

Nach vielen ergebnislosen Versuchen hab ich die Anwendung zuerst in der erstgenannten DB zum Laufen gebracht, dann den Code genommen und in die zweite DB überführt, die hinterlegte DB auf die neue aktualisiert (D:\Bescheide_HM.accdb), musste dennoch feststellen, dass wieder der Fehler ausgelöst wurde, dazu der Code:

Set app_dok = CreateObject("Word.Application")
app_dok.Visible = True
app_dok.Documents.Add ("K:\01_Hauptdokumente\HM_Bearbeitungsbogen.dot")

'hier kommt der Fehler 
app_dok.ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
app_dok.ActiveDocument.MailMerge.OpenDataSource _
  Name:="D:\Bescheide_HM.accdb", _
  ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=True, _
  AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:="", _
  WritePasswordDocument:="", WritePasswordTemplate:="", Revert:=False, _
  Format:=wdOpenFormatAuto, _
  Connection:="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=""D:\Bescheide_HM.accdb"";", _
  SQLStatement:="SELECT * FROM `e_brief10`", SQLStatement1:="", SubType:=wdMergeSubTypeAccess

Anfangs dachte ich, es läge vielleicht an Leerzeichen oder Sonderzeichen im Pfad, darum hab ich die rausgenommen, jedoch ohne Änderung.

Beide DBs liegen auf derselben lokalen Platte, ich kann mir keinen Reim drauf machen. Ich kann mir nur vorstellen, dass es an den Datenbanken selbst liegt, ich habe MSO Prof Plus 2010.

Kann mir jemand einen Tipp geben?

Gruß Tom

VB
VB
Eine objektorientierte Programmiersprache, die von Microsoft entwickelt wurde und im .NET Framework implementiert ist. Zuvor als Visual Basic .NET bekannt.
5 Fragen
{count} Stimmen

Ihre Antwort

Fragesteller*innen können Antworten als akzeptierte Antworten markiert werden, wodurch Benutzer*innen wissen, dass diese Antwort das Problem gelöst hat.