ACCESS フィルター設定
本日二回目はACCESSでのフィルター(抽出条件)についてです。フォーム内に抽出条件を設定する方法です。分かりやすく画像とか出したいのですが、ACCESS開けないので文字だけで
す。まずは、テキストを挿入して名前を設定します。ボタンも配置します。このボタンにクリック時にコードビルターを開きます。曖昧検索をしたい場合は Like演算子と”*”を使えばいけます。
Private Sub 住所検索ボタン_Click()
Me.Filter = “所在地 like’*” & 住所検索 & “*'”
Me.FilterOn = True
End sub
補足説明
所在地は、テーブルにもある抽出したいもので、住所検索が上記で配置したテキストの名前です。これで曖昧検索の完了です。
また、フィルターを解除したい場合のVBAは
Me.FilterOn = False
です。