アクセスOpenForm 引数FilterName

質問

テーブルをレコードソースとしているフォームがあるのですが
そのテーブルのtestフィールドに値がいくつかはいっていて、「い」と言う値を抽出した状態で
フォームを開きたいのですが

Sub test()
DoCmd.OpenForm "フォーム1", acNormal, "test ='い'"
End Sub
これは、意味がないのですか？

このコードを実行してフォームを開いても、
testにフィルタは適用されない状態で開きます。

また、ヘルプのFilterNameの項目を見ると

-------------------------------------------
有効なSQLWHERE句を文字列式で指定します。
ただし、WHEREという語を指定する必要はありません。
-------------------------------------------
と書いてありますが、"test ='い'"と言う記載の仕方は間違っていますか？

Private Sub Form_Load()
Me.Form.Filter = "test ='い'"
Me.Form.FilterOn = True
End Sub

だと、フィルタが適用されます。

OpenForm メソッドを使ってフィルタを適用する方法を教えてください。

回答No.1

bin-chan · ベストアンサー

Test like '*い*'

含むは＝ではなくLikeです。

＊は0文字以上のワイルドカードです。1文字を表す?もあります
Test like '*い*' のように前後にあることで「含む」を表します。
Test like 'い*' のように 後にあることで「［い］で始まる」を表します。
Test like '*い* のように 前にあることで「［い］で終る」を表します。

お礼

ご回答ありがとうございます。

回答No.2

hatena1989

ヘルプの行を読み間違えてます。

FilterName（第3引数）
-------------------------------------------
カレント データベースのクエリの有効な名前を文字列式
で指定します。
-------------------------------------------

WhereCondition（第4引数）
-------------------------------------------
有効なSQLWHERE句を文字列式で指定します。
ただし、WHEREという語を指定する必要はありません。
-------------------------------------------

です。

DoCmd.OpenForm "フォーム1", acNormal, , "test ='い'"

お礼

ご回答ありがとうございます。