VBA更新MS Access数据库 - 多个WHERE子句

Question

我正在尝试根据多个条件更新我的数据库。 （我在同一个数据库中检索到excel中的一组列）

如果我有一个＆＃34; WHERE条件＆＃34;以下代码可以正常工作。如果我添加多个＆＃34; AND＆＃34;条件，它不会更新数据库。猜测它是我的sql语句中的语法问题。

工作代码

Dim dbione, dbitwo, dbithree, stime As String
Set r = [B3]
While r.Offset(0, -1).Value > 0
dbione = r.Offset(0, 0) 'this is an ID
dbitwo = r.Offset(0, 1) 'this is another ID
dbithree = r.Offset(0, 2) 'this is another ID

stime = r.Offset(0, 4)

感谢任何帮助我解决这个问题的人。

Answer 1

我认为在这里发布我的问题会让我的想法变得不合时宜。我一发布就能解决这个问题:) 问题是-1，因为列是空白的！ 纠正了这一点，它工作正常：     r.Offset(0, -1).Value > 0