我在.accdb数据库上有一个数字数据A,B,C和D,用2个数据FindA和FindB查找并得到E作为答案
如何使用ADODB使用Excel VBA 2016查找A> = FindA,B <= FindA,C> FindB和D 这是我的Simper代码:Set cnn = New ADODB.Connection
cnn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & DbPath & DbFile & ";Jet OLEDB:Database Password=" & DbPwd & ";"
Set rs = New ADODB.Recordset
rs.Open "SELECT * FROM [" & DbTblG & "] Order BY [A] >=" & FindA & " AND [B] <=" & FindA & " AND [C] >" & FindB & " AND [D] <" & FindB & ";", cnn, adOpenStatic
E = rs![E]
rs.close