Tips21 - SQL文 複数のフィールドの値を抽出する

Dim SQL as String
Dim rs As Recordset
SQL = "SELECT フィールド名1,フィールド名2 AS 別名 FROM テーブル名"
Set rs = CurrentDb.OpenRecordset(SQL)
このようにフィールド名をコンマで区切り指定します。
順番はここで指定したフィールド順になるので、入れ替えて取り出したい時にも使用できます。