access中这类查询如何被vba调用？

yellowjacky

access 数据库中有sheet1表和3个查询"1","2","总"

"1"的内容如下：
SELECT sheet1.Name, Sum(IIf(sheet1.购买日期,1,0)) AS 购买量
FROM sheet1
WHERE (((sheet1.购买日期)>=[QS] And (sheet1.购买日期)<=[JS]))
GROUP BY sheet1.Name;

"2"的内容如下：
SELECT sheet1.Name, Sum(IIf(sheet1.使用日期,1,0)) AS 使用量
FROM sheet1
WHERE sheet1.使用日期>=[QS] And sheet1.使用日期<=[JS]
GROUP BY sheet1.Name;

"总"的内容如下：
SELECT [1].Name, [1].购买量, [2].使用量
FROM 1 LEFT JOIN 2 ON [1].Name = [2].Name;

现在我想在vba中调用"总"，请问代码如何写？
我目前是sql = "SELECT [1].Name, [1].购买量, [2].使用量 FROM 1 LEFT JOIN 2 ON [1].Name = [2].Name"
可是会报错，至少缺少一个参数。

求教了，谢谢

yellowjacky

求教，有人知道吗？

轻风

调用来干嘛？想查看查询结果吗？

yellowjacky

轻风 发表于 2012-7-26 11:52
调用来干嘛？想查看查询结果吗？

想在excel中显示结果

roych

直接使用“总”就好了。
如果是Excel VBA的话，进行数据连接（ADODB.Connection）后，直接用:
rst.Open "总", cnn, adOpenKeyset, adLockOptimistic
rst为创建的记录集，cnn为数据连接。
如果是在Access里处理的话，直接用TransferSpreadsheet宏就好了，参数分别是：
迁移类型：导出
电子表格类型：Microsoft Excel 8-10
表名称：总
文件名称：需要导出的路径（例如：C：\AA.xls）
其余参数默认。