请问：怎么将多个查询结果同时导出到同一个excel中，谢谢了

李腾　发表于：2011-03-04 11:27:31 　

我有一个数据库，建了好几十个简单的查询，我想把这几个查询的结果一次导出到一个EXCEL中，怎么办呢？谢谢了！

我现在就只能一个一个的复制粘贴，因为要经常用，特别费时间，望大家赐教是否可行，怎么做？谢谢！

煮茶论道发表于：2011-03-04 12:16:36

在按钮单击事件下

Dim Expath As String

Expath = CurrentProject.Path & "\"’excel 表存放在你Access的文件夹位置

DoCmd.TransferSpreadsheet acExport, 8, "你的查询表名称", Expath & "Excel工作簿名称", True, "工作簿里的表名称1"

DoCmd.TransferSpreadsheet acExport, 8, "你的查询表名称", Expath & "Excel工作簿名称", True, "工作簿里的表名称2"

DoCmd.TransferSpreadsheet acExport, 8, "你的查询表名称", Expath & "Excel工作簿名称", True, "工作簿里的表名称3"

DoCmd.TransferSpreadsheet acExport, 8, "你的查询表名称", Expath & "Excel工作簿名称", True, "工作簿里的表名称4"

李腾发表于：2011-03-04 14:56:25

十分感谢，谢谢!

总记录：2篇页次：1/1 9 1 :

Access交流中心