フォームにフィルタを設定するにはFormオブジェクトのFilterプロパティとFilterOnプロパティを使用します。Filterプロパティで抽出条件を設定しFilterOnプロパティにTrueを設定することによりフィルタを実行します。
Form.Filter = 抽出条件
Form.FilterOn = True
フォームのフィルタを解除する場合にはFormオブジェクトのFilterOnプロパティにFalseを設定することによりフィルタを解除します。
Form.FilterOn = False
以下の例では氏名が"武"で始まるレコードを抽出します。
Private Sub 抽出_Click()
Me.Filter = "氏名 Like '武*'"
Me.FilterOn = True
End Sub
以下の例では生年月日が2001/01/01以前のレコードを抽出します。
Private Sub 抽出_Click()
Me.Filter = "生年月日 < #2000/01/01#"
Me.FilterOn = True
End Sub
フォームの作成と実行 | フォームを開く | フォームを閉じる | フォームよりレコードを操作する | フォームよりレコードを検索する | フォームよりフィルタを設定する | フォームのイベント