ADODB / Excel查询错误

当我尝试使用ADODB连接Excel数据库时,它说:

you try to execute a query without a specified expression <Destinataire> 

这是我的代码:

 MyQuery = "Select Destinataire, SUM(" & Entete & ") AS NombreTotal FROM [Feuil1$] " _ & "WHERE [DateMad] Between #" _ & Format(date_deb, "yyyy/mm/dd") _ & "# And #" & Format(date_fin, "yyyy/mm/dd") & "#" & Query3 & "" objRecordSet.Open MyQuery, objConnection, adOpenStatic, adLockOptimistic 

它出什么问题了?

你忘了那个group by

查询应该看起来像这样

 Select Destinataire, SUM(NbCompteurElec) AS NombreTotal FROM [Feuil1$] WHERE [DateMad] Between #2012/10/22# And #2012/10/26# And [Destinataire] = 'REL12' Group By Destinataire 

在你的代码中应该是这样的

 MyQuery = "Select Destinataire, SUM(" & Entete & ") AS NombreTotal FROM [Feuil1$] " _ & "WHERE [DateMad] Between #" _ & Format(date_deb, "yyyy/mm/dd") _ & "# And #" & Format(date_fin, "yyyy/mm/dd") & "#" & Query3 & " Group By Destinataire" 

这里有一个关于GROUP BY子句的例子