ado フィルタで 含まない とするには？

含むなら
rs.Filter = "文字列 like '*A*'"
でいけるのですが
rs.Filter = "文字列 not like '*A*'"
だと
実行時エラー3001「引数が間違った型、許容範囲外、または競合しています。」
になります。

rs.Filter = "文字列 not like '%A%"
でもダメでした。

NOTの位置がおかしいのでしょうか？

No.2 ベストアンサー 回答者： nicotinism 回答日時： 2013/04/08 11:16

普段レコードセットのFilterは使わないので、今更ながら気が付きました。

ヘルプによれば
"演算子" は、<、>、<=、>=、<>、=、または LIKE である必要があります
となっていて、NOT そのものが無いですね。
NOTの代わりに <> like '*A*' も無駄な足掻きでした。
DAOのRecordsetやフォームのFilter なら、NOT も有効なのですけどねぇ。
#1 さんのリンク先の様にSQLで求めるのがベストかな。

Sub FilterTestDAO()
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("テーブル名", dbOpenSnapshot)
rs.Filter = "文字列 not like '*A*'"
Set rs = rs.OpenRecordset()
rs.MoveLast
Debug.Print rs.RecordCount
End Sub

この回答へのお礼

adoでフィルタを使うことは諦めます。
daoでやったらできました。
ご回答ありがとうございました。

お礼日時：2013/04/13 08:20

No.1 回答者： hallo-2007 回答日時： 2013/04/07 20:25

既、回答例ですが

http://oshiete.goo.ne.jp/qa/5263578.html
のようですね。

この回答へのお礼

無理なようですね。

お礼日時：2013/04/13 08:19