adodb.recordset.filterにおいて「一つのフィールドで複数の値」の絞り込みを「複数のフィールド」で行いたい場合の処理について

Question

microsoftのadoのfilterに関する解説には

'--------
AND と OR の間に優先順位はありません。 句はかっこでグループにまとめることができます。 ただし、次のコード スニペットのように 、OR で結合された句をグループ化し 、AND を使用してグループを別の句に結合することはできません。
(LastName = 'Smith' OR LastName = 'Jones') AND FirstName = 'John'

この場合は、フィルターを次のように構成します。
(LastName = 'Smith' AND FirstName = 'John') OR (LastName = 'Jones' AND FirstName = 'John')
'--------

と記載がありますが、現実にデータベースから絞り込みを行いたい場合そんな簡単なケースは多くなく、
あるフィールドから複数要素、別のフィールドから複数要素で絞り込みたいケースが多いです。

excel vba でいうところのrange.filterであればfilterの2段構えで先にLastNameをフィルタリングしてからFirstNameのフィルタリングが可能で、accessを立ち上げてGUI上で行なうと簡単にできるのですが、これをvbaでrecordsetを操作してやろうとしても後者のfilterが優先されてしまい、うまくいきません。

上述のmicrosoftの解説の通りの式にしようとすると分配展開が多くなりすぎてformulastringの上限を軽く超えてしまいます。
excel vbaのrange.filterでは絞り込み要素にarray指定ができるので、それと似たような方法がないかと探していますがたどり着きません。

どなたかレクチャーいただけますでしょうか。

Answer 1

.Find,.Sort,.Filterのいずれも指定が文字列で、かなりSQLチックなんでIN句とか用いて表題のようなことができないのかな〜とか思っちゃいますが、この文字列ってSQLじゃないんでしょうかね。

Comments

[hatena19]

SQLチックではあるけど、公式ドキュメントによるといろいろ制限がありますね。
ADOよりDAOの方が制限はすくなかったと思います。
ただ、Filterプロパティは私は使ったことはないです。SQLのWHERE句で間に合いますので。

[Nor-Xor]

確かに。
実際にSQL触るようになると、ADODBの各コマンドで使うのがopenとgetrowsくらいになりますもんね。
.executeでコマンドぶん投げる方が効率もいいですし。

Answer 2

ありがとうございます。
どうにもSQLに抵抗があって、なるべく触れずにいたいと避けてました。
食わず嫌いというもので、やってみると便利な代物でした。

Answer 3

Filter プロパティ (ADO) | Microsoft Docs

公式のドキュメントに記載してあることなので、それは仕様としてあきらめしかないかと。

Filterを使わずにレコードセットをOpenするときにSQLで開けば、SQLのWHERE句ではそのような制限なしに条件式を記述できます。
Filterを使うより、SQLのWHERE句で条件を設定してた方が処理も高速です。

Comments

[Nor-Xor]

ありがとうございます。
どうにもSQLに抵抗があって、なるべく触れずにいたいと避けてました。
食わず嫌いというもので、やってみると便利な代物でした。

[Nor-Xor]

.Find,.Sort,.Filterのいずれも指定が文字列で、かなりSQLチックなんでIN句とか用いて表題のようなことができないのかな〜とか思っちゃいますが、この文字列ってSQLじゃないんでしょうかね。