将数据从Excel导入Access

时间:2012-07-11 07:27:04

标签: excel ms-access vba access-vba

我在Excel中的Sheet 1中有一些列。我需要通过匹配Access和amp;中的列标题将数据导入Access。 Excel中。以同样的方式,我想将多个Excel文件导入Access,根据Access中的列(字段)将数据附加到现有表。

这甚至可能吗?如果是这样,我将如何去做呢?

1 个答案:

答案 0 :(得分:5)

最简单的方法是使用DoCmd.TransferSpreadsheet链接Excel工作表或范围:

DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel8, _
"Atable", "z:\docs\test.xls", True, "A1:A15"

然后,您可以使用通常的MS Access SQL操作表。

您还可以参考Excel工作表 - [Sheet1$] - 或查询中的范围:

INSERT INTO Table1 ( ADate ) 
SELECT SomeDate FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xls].[Sheet1$a1:a4]

或者使用命名范围,请注意Excel 8.0也适用于2007类型文件。

INSERT INTO Table1 
SELECT * FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xlsm].[XLTable]

XLTable是指定范围。