原文：http://access911.net/74FAB31E14DC.htm
问题：
回答：
|
注意：这里不仅可以导出“表”中的数据到EXCEL文件，还可以导出“查询”的结果到 EXCEL文件中。
比如，将以下语句粘贴到 NORTHWIND.MDB 的模块中就可以导出“按年度汇总销售额”这个查询的结果到 C:\A.XLS 这个 EXCEL 文件中。
这里之所以要演示导出查询而不是导出表，是因为查询可以是某个表按某种条件筛选后的结果。
Function ExportEg()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "按年度汇总销售额", "c:\a.xls", True
End Function |
再请看以下示例：
| DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "table_juan", strFilePath, True, "juan" |
strfilepath 是 xls文件的路径，比如： strfilepath="c:\a.xls"
table_juan 是数据库中表的名字
juan 是xls文件中 sheet 的名字
以下示例将演示如何将一个参数查询的结果导出为一个指定的 EXCEL 文件，非常简单，具体代码只有一句：
http://access911.net/down/eg/parameter_query_export_to_excel.rar
| | 
|站长邮箱|小黑屋|手机版|Office中国/Access中国
( 粤ICP备10043721号-1 ) 