Makro funktioniert plötzlich nicht mehr
25.01.2017 15:17:59
Hage
ich habe ein komisches Problem.
Ich habe ein Excel-Sheet mit dem man Bestellungen und Rechnungen als Serienbriefe erzeugen kann. Die Serienbriefe werden dann per Mail verschickt.
Das ging auch bisher immer ohne Probleme.
Das Makro erzeugt aus den Daten im Excel Serienbriefe und erstellt eine E-Mail mit dem Dokument als Anhang.
Ich habe also quasi 2 identische Makros: Einmal für Bestellungen und einmal für Rechnungen.
Jetzt bekomme ich aber neuerdings immer eine Fehlermeldung, wenn ich die Bestellungen als Serienbrief erzeugen will.
Und zwar: the remote server machine does not exist or is unavailable (error 462)
Ich habe schon das Rechnungs-Makro eins zu eins kopiert und nur marginal was geändert am Code (beispielsweise den Zielordner).
Eine ältere Version meines Tools funktionert auch einwandfrei, auch da hilft es nicht, den Code eins zu eins zu kopieren.
Weiß jemand Rat?
Danke!
PS: das ist der Code-Teil, bei dem gemeckert wird
wdDoc.MailMerge.OpenDataSource Name:= _
sExcel, _
ConfirmConversions:=False, _
ReadOnly:=False, _
LinkToSource:=True, _
AddToRecentFiles:=False, _
PasswordDocument:="", _
PasswordTemplate:="", _
WritePasswordDocument:="", _
WritePasswordTemplate:="", _
Revert:=False, _
Format:=wdOpenFormatAuto, _
Connection:="Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=sExcel;Mode=Read;Extended Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Engine Type", _
SQLStatement:="SELECT * FROM `Daten_Bestellungen$`", _
SQLStatement1:="", _
SubType:=wdMergeSubTypeAccess