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:

markieren

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

PUSH--> Hat noch niemand mit SQL gearbeitet und hat mir einen kleinen Tipp?

Hi.

Hast du es schon mit square brackets um die Datenbank-Objektnamen probiert?

SELECT * FROM `Output$` WHERE (([Sprache] = 'DE') AND ([Erhalten] = 'y')) Grüße vom marabu