“DoCmd.TransferSpreadsheet”导出到Excel

我需要导出一个访问表从ACCESS到EXCEL。 有618499行。 我试过简单的方法：右键单击 – 导出 – excel。 它只有当我select格式导出（没有格式创build空白Excel文件），但它不方便，因为我将不得不创build10个文件。 我试图使用这个代码，但它变成了红色，并没有工作：

DoCmd.TransferSpreadsheet( [acExport], [acSpreadsheetTypeExcel12Xml], [tab_1], ["C:\Users\admin\Desktop\import_2014\final.xlsx"], [True]) 

1. 我应该改变什么呢？
2. 我应该如何在模块中input
3. 或者，也许你可以提供另一种简单的解决

Answer 1

所有VBA代码必须在一个子模块或function模块中。

摆脱所有这些[] ，如果你想把每个参数放到一个新的行，使用行连接符号_

 DoCmd.TransferSpreadsheet _ acExport, _ acSpreadsheetTypeExcel12Xml, _ "tab_1", _ "C:\Users\admin\Desktop\import_2014\final.xlsx", _ True 

编辑

使用Call ：

 Call DoCmd.TransferSpreadsheet(acExport, acSpreadsheetTypeExcel12Xml, _ "tab_1", "C:\Users\admin\Desktop\import_2014\final.xlsx", True) 

或省略括号：

 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, _ "tab_1", "C:\Users\admin\Desktop\import_2014\final.xlsx", True