【AccessVBA】リストボックスのソース（テーブルorクエリ）を並べ替えて表示する方法

【Access】で、ボタンをクリックして、リストボックスにデータを表示させるときのソース（テーブルorクエリ）を指定するイベントプロシージャは

※リストボックス名：『listTable』
※ソースのクエリ名：『q市場業販売上集計』
※ボタン名：『市場売上表示ボタン』

Private Sub 市場売上表示ボタン_Click()
Me.listTable.RowSourceType = “Table/Query”
Me.listTable.RowSource = “q市場業販売上集計”
End Sub

また、、これを並べ替えて表示させる為には、クエリ名（もしくはテーブル名）の部分をSQLに置き換えて、以下のように書き換える。

※フィールド名：『取引日』
※『q市場業販売上集計』の『取引日』で降順で並べ替える

Private Sub 市場売上表示ボタン_Click()
Me.listTable.RowSourceType = “Table/Query”
Me.listTable.RowSource = “SELECT * FROM q市場業販売上集計 ORDER BY 取引日 DESC;”
Me.listTable.Requery
End Sub

同様に、フィルターをかけて表示させたいときは「Filter」はコンボボックスやリストボックスには使用できないので、WHERE句を使ったSQLでソースを指定するとよい。