Hallo!
Habe ein Macro für einen Serienbrief aufgezeichnet.
Datenquelle: Exceltabelle mit Spaltentitel "Sprache", "Erhalten" und andere.
Unter Word 2000 hat das Macro einwandfrei funktioniert. Unter Word 2003 nicht mehr.
Wenn ich SQLQuery = "SELECT * FROM `Output$` schreibe, funktioniert's auch unter
Word 2003. Mit dem WHERE nicht mehr.
Ich erhalte ich die Fehlermeldung "Fehler 5922: Word konnte Datenquelle nicht öffnen".
Hat jemand eine Idee warum?
Codeauszug:
Code:
Const DataSourceFile As String = "C:\xyz\ExcelTabelle.xls"
SQLQuery = "SELECT * FROM `Output$` WHERE ((Sprache = 'DE') AND (Erhalten = 'y'))"
ActiveDocument.MailMerge.OpenDataSource Name:=DataSourceFile _
, ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=True, _
AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:="", _
WritePasswordDocument:="", WritePasswordTemplate:="", Revert:=False, _
Format:=wdOpenFormatAuto, Connection:= _
"Provider=Microsoft.Jet.OLEDB.4.0;Password="""";User ID=Admin;Data Source=" & DataSourceFile & ";Mode=Read;Extended Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Re" _
, SQLStatement:=SQLQuery, SQLStatement1:="", SubType:= _
wdMergeSubTypeAccess
ActiveDocument.MailMerge
.Execute Pause:=False