VBA_Excel进入Access

Question

我正在尝试使用VBA将Excel文件（我在本地驱动器上）导入Microsoft Access。

目前这是我的代码，但我知道它不正确：

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, "example", selectFile, True

有人可以帮忙吗？

Answer 1

电子表格传输的完整模板如下：

expression.TransferSpreadsheet(TransferType, SpreadsheetType, TableName, _
FileName, HasFieldNames, Range, UseOA)

其中TransferType（在您的情况下）是acImport而SpreadsheetType是acSpreadsheetTypeExcel12Xml（假设它实际上是Office 2010 XML文件）。

TableName将是您将电子表格导入Access数据库中的表的名称，FileName是您要导入的文件的名称（包括完整路径）。 HasFieldNames指的是电子表格中的第一行是否包含字段名称。如果您打算仅从电子表格中导入特定范围，则会使用范围，并且不再支持UseOA。

由于您没有提供有关文件名，表名或其他任何内容的具体信息，我可以提供的只是这个“示例”代码。您必须自己更换自己的信息。请注意，Range是可选的，如果您不想输入特定范围，则只需删除该部分。

DoCmd.TransferSpreadsheet acImport, 10, "MyTableName", _
    "C:\MyDocuments\MyFile.xls", True, "A1:G12"

请注意，SpreadsheetType可以使用数值而不是全文值，两者都可以接受。