Access VBA 入門講座

Homeレコードの並び替えレコードの並び替え Sort

データベースのテーブルより特定の条件でレコードを並び替えする場合はSortメソッドを使用します。昇順に並び替える場合は引数にAcsを指定し、降順に並び替える場合はDescを指定します。


レコードセット変数.Sort = "フィールド名 Asc"

レコードセット変数.Sort = "フィールド名 Desc"
						

以下の例では名簿テーブルよりOpenメソッドによりレコードセットを作成して、Sortメソッドで姓を昇順にレコードを並び替えして全て表示し、Closeメソッドで閉じています。


Sub Sample()

    Dim rs As New ADODB.Recordset

    rs.Open "名簿", CurrentProject.Connection

    rs.Sort = "姓 Asc"

    Do Until rs.EOF

        Debug.Print rs!姓 & rs!名

        rs.MoveNext

    Loop

    rs.Close

End Sub