Access VBA 入門講座

Homeレコードの抽出レコードの抽出 Filter

データベースのテーブルより特定の条件でレコードを抽出する場合はFilterメソッドを使用します。


レコードセット変数.Filter = 抽出条件
						

以下の例では名簿テーブルよりOpenメソッドによりレコードセットを作成して、Filterメソッドで姓が"鈴木"であるレコードを抽出して全て表示し、Closeメソッドで閉じています。


Sub Sample()

    Dim rs As New ADODB.Recordset

    rs.Open "名簿", CurrentProject.Connection

    rs.Filter = "姓='鈴木'"

    Do Until rs.EOF

        Debug.Print rs!姓 & rs!名

        rs.MoveNext

    Loop

    rs.Close

End Sub