Question

亲爱的，我有一个excel文件（.xls），第一个Sheet中的数据名为“Customers”。我还有一个Access.mdb数据库，其中包含一个名为“CustomerDetails”的表。我想使用VB6代码将数据从Excel工作表传输到Access数据库。我怎样才能做到这一点？提前谢谢，

Answer 1

通过这个 http://office.microsoft.com/en-ca/access-help/import-export-and-link-data-between-access-and-excel-HP001095095.aspx

Answer 2

您可以使用Access从Excel导入工作表吗？

如果没有，并且您需要在VB中执行此操作，则需要在VB中打开Excel文件或从Excel导出为csv格式并打开它，然后将数据写入现有的Access表。 / p>

Answer 3

这很简单，只需将下面的代码放在Access中的模块中，这将自动为您导入。如果您需要运行代码，可以将其放在form_open或类似的东西中。您甚至可以使用批处理文件启动它。

Function import()

basedir = "INSERT YOUR SPREADSHEET HERE"

DoCmd.TransferSpreadsheet _
            acImport, _
            acSpreadsheetTypeExcel9, _
            "TABLE NAME HERE", _
            basedir, _
            False
End Function

使用VB6将数据从Excel文件传输到Access File

3 个答案: