excel - 将新数据导入现有表访问 vba

Question

目前我可以将 excel 数据输入到新表中，但我想每次选择新的 excel 表时都将新数据附加到表中？我现在使用的代码如下所示。

Option Compare Database
Option Explicit

Public Sub ImportExcelSpreadsheet(fileName As String, tableName As String)
On Error GoTo BadFormat
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, "Sample", 
fileName, True

Exit Sub

标签： excelms-accessvbams-access-2010

Answer 1

链接表格：

DoCmd.TransferSpreadsheet acLink, …

然后创建一个追加查询，该查询使用此链接表作为源并将您的数据写入（追加）到您的示例表。