Excel VBA Adodb如何查找具有比较多值的记录集?

时间:2018-10-17 09:50:10

标签: excel vba adodb

我在.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

0 个答案:

没有答案