ms-access - 如何从 Access 2010 VBA 连接到 Excel xls 文件

Question

我为此搜索了很多，但我无法找到它..

我有一个大约 13K 行的 excel 文件 (.xls)。我希望能够从 Access 2010 VBA 连接到它，然后能够从中复制我工作所需的数据。

任何人都建议我如何做到这一点。

Answer 1

您可以在 MS Access 中创建查询：

INSERT INTO Table1 
SELECT FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xlsm].[Sheet1$] s
WHERE s.SomeField=2

或者

SELECT * INTO Table1 
FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xlsm].[Sheet1$] s
WHERE s.SomeField=2

您还可以引用命名范围和范围。您还可以简单地设置查询并允许用户创建自己的生成表查询。

在 VBA 中

 Dim db As Database
 Set db = CurrentDB

 ssql="SELECT * INTO Table1 " _
  & "FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xlsm].[Sheet1$] s " _
  & "WHERE s.SomeField=2"
 db.Execute ssql, dbFailOnError