微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

试图通过Access-VBA代码更新Excel表错误:找不到数据库对象“ Ware”

如何解决试图通过Access-VBA代码更新Excel表错误:找不到数据库对象“ Ware”

我有许多Excel文件,这些文件包含需要合并到一张表中的数据。

是否可以从Access VBA代码中做到这一点,这是我所希望的?还是我应该在Excel VBA中这样做?

我的想法是遍历Excel文件,并对更新列WHERE MyCondition使用sql语句,以将所需的值获取到所需的列。有可能这样吗?或者对解决这个问题有什么建议?

到目前为止,我已经通过Access尝试过这种方式:

Sub Execute_UpdateQuery()
   Dim conn As ADODB.Connection
   Dim NumOfRec As Integer
   Dim strPath As String

   strPath = "D:\Sortierliste August_September\Test.xlsx"

   Set conn = New ADODB.Connection

   conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strPath & ";Extended Properties=Excel 12.0 Xml;HDR=YES;"

   conn.Execute "UPDATE Ware SET Name = 'test'" & _
      " WHERE Name = 'Ackermann'",NumOfRec,adExecutenorecords

   Debug.Print NumOfRec & " records were updated."
   conn.Close
   Set conn = nothing
End Sub

但是这导致一个错误“无法找到访问数据库模块“ Ware”。我想这是因为它只是一个excel表而不是一个数据库吗?我以为它可以找到一个包含表的excel文件。处理并执行一个SQL查询,对于如何解决此问题,任何帮助或建议都将非常有用。

格里兹

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。