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

亲爱的各位， 我有一个excel文件（.xls），第一张表中的数据名为“客户”。我还有一个Access.mdb数据库，其中包含一个名为“CustomerDetails”的表。我想使用VB6代码将数据从excel工作表传输到Access数据库。 我该怎么做？

---

提前感谢，

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

---

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

这非常简单，只需将以下代码放在Access中的模块中，即可自动导入。如果您需要运行代码，您可以将其放在表单_open或类似的格式中。您甚至可以使用批处理文件启动它

Function import()

basedir = "INSERT YOUR SPREADSHEET HERE"

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

经历这一切

---

付钱给程序员来编写这样的代码？？？谢谢米奇·麦特！我自己想出来的：）