VBA Excel – ACCESS中的更新logging

我有一个问题。

我想使用EXCEL中的VBA更新Access数据库中的现有logging。

我的代码：

sqlik = "UPDATE query which works in access" Set ZAP_QUERY2 = baza.CreateQueryDef("", sqlik) With ZAP_QUERY2 ![abc] = Edit_Form.abc.Text ![bcd] = Edit_Form.bcd.Text ![cde] = Edit_Form.cde.Text End With 

当我使用sqlik =“在访问中起作用的SELECT查询”时，它没有做任何改变。 但是用sqlik =“在访问中起作用的UPDATE查询”，它说“在这个集合中找不到任何对象”

有任何想法吗？

谢谢你的帮助

Answer 1

使用DAO的解决scheme：

 ... dim db as DAO.Database, rec as Dao.Recordset dim strSQL as String Set db = OpenDatabase("c:\DatabaseFolder\YourDatabase.accdb") strSQL = "SELECT * FROM yourTable WHERE yourField=1" Set rec = db.OpenRecordset(strSQL, dbOpenDynaset, dbEditAdd) With rec .MoveFirst ![aField] = Edit_Form.abc.Text .Update End With rec.Close db.Close ... 

希望这可以帮助你