Accessのコード入力

アクセス初心者です。
レポート内の検索結果を再びレポートで表示したいため、フォームのコードで下記のようにしたのですが、フォームで前後の文字を入れなくても検索できるようにするにはどのようにしたら良いでしょうか。
(テーブルなどで検索する時の、*a* のような感じです)

DoCmd.OpenReport "R1", acViewDesign
Reports!R1.FilterOn = True
Reports!R1.Filter = "[a]='" & Me.テキスト1.Value
DoCmd.OpenReport "R1", acViewPreview

宜しくお願い致します。

No.1 ベストアンサー 回答者： bonaron 回答日時： 2006/07/14 12:41

普通は、デザインビューで開いてフィルタの設定をする、

ということは、しませんが。

DoCmd.OpenReport "R1", acViewPreview, , "a Like '*" & Me.テキスト1 & "*'"

引数については、OpenReport の上にカーソルを置いて
F1キーを押せば、ヘルプが表示されます。

この回答へのお礼

参考になりました。
デザインビューを開かず出来るのは知りませんでした。
有難うございました。

お礼日時：2006/07/14 15:35