SQL入門
データの取得：集約集計、並べ替え（DISTINCT,GROUP,HAVING,ORDER）

データの取得：集約集計、並べ替え（DISTINCT,GROUP,HAVING,ORDER）

エクセルVBAでデータベースを扱うためのSQL入門です。
前回もっとも単純なSELECT文(SELECT…FROM…WHERE)を紹介しました。
これは、1行のデータはそのまま1行のデータとして、順番はDBに保存されている順で取得されるものでした。

データの取得：SELECTの構文

テスト用のテーブルとVBAコード

CREATE TABLE t_sales (
 'id' INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL
,'code' TEXT NOT NULL
,'name' TEXT NOT NULL
,'address' TEXT
,'sales_date' TEXT
,'item_code' TEXT
,'item_name' TEXT
,'item_price' INTEGER
,'item_count' INTEGER
,'item_amount' INTEGER
,'comment' TEXT
);

DISTINCT句

DISTINCT句を指定すると、取得したデータの重複を取り除いてユニークなデータとして取得できます。

sSql = sSql & "SELECT DISTINCT code,name" sSql = sSql & " FROM t_sales"

codeとnameの重複の無いデータを取得しています。

GROUP BY句

C列の日付は文字列としてセルに入っています。
日付データにするには、VBAで以下を実行します。、

With Intersect(ws.Range("A1").CurrentRegion, ws.Columns("C")) 　　.Value = .Value End With

このようにValueを入れ直すことで、Excelが自動的に日付データに変換してくれます。

※SQLiteの日付について

HAVING句

集計後の条件でデータを絞り込めます。
集計関数（SQL関数）はWHERE句の条件式に指定できませんので、集計後の値を基に条件を指定する場合はこのHAVING句を使用します。

sSql = sSql & "SELECT code,name,sales_date,SUM(item_amount)" sSql = sSql & " FROM t_sales" sSql = sSql & " GROUP BY code,name,sales_date" sSql = sSql & " HAVING SUM(item_amount) > 7000000"

code,name,sales_dateでグループし、item_amountの合計が7000000以上を取得しています。

ORDER BY句

ORDER BY句を使う事で、ソートした結果を取得することができます。
複数の列（または任意の式）を指定でき、それぞれに昇順/降順を指定できます。

sSql = sSql & "SELECT code,name,item_price,item_count" sSql = sSql & " FROM t_sales" sSql = sSql & " WHERE code = '001'" sSql = sSql & " ORDER BY item_price ASC,item_count DESC"

codeが'001'のゼンデータを、
item_priceを昇順、item_countを降順で取得しています。

VBAでのSQL使用例

上記までを複数組み合わせたSQLのサンプルです。

sSql = sSql & "SELECT code,name,sales_date,SUM(item_amount)" sSql = sSql & " FROM t_sales" sSql = sSql & " GROUP BY code,sales_date,item_code" sSql = sSql & " HAVING SUM(item_amount) >= 250000" sSql = sSql & " ORDER BY SUM(item_amount) DESC"

code,sales_date,item_codeでグループ化し、
そのグループのitem_amountが250000以上を、
item_amountの合計の降順で取得しています。

列名（カラム名）の別名（エイリアス）をつけるAS句

列名（カラム名）には、別名（エイリアス）を付けることができます。

列名 [AS] 別名
任意の式 [AS] 別名

[AS]は省略できます。

sSql = sSql & "SELECT" sSql = sSql & " code AS コード" sSql = sSql & ",name AS 名称" sSql = sSql & ",sales_date AS 販売日" sSql = sSql & ",SUM(item_amount) AS 合計" sSql = sSql & ",COUNT(*) AS 件数" sSql = sSql & " FROM t_sales" sSql = sSql & " GROUP BY code,sales_date,item_code" sSql = sSql & " HAVING SUM(item_amount) > 250000" sSql = sSql & " ORDER BY SUM(item_amount) DESC"

SQLが複雑になってくると、カラム名に短いエイリアスをつけることで、
SQLの他の部分で分かりやすい短い別名で参照することができるようになります。
別名（エイリアス）のより便利な使い方については、今後徐々に説明していきます。

※FROMに記述するテーブル名にも別名（エイリアス）が指定できます。
これについては、テーブルの結合の時に詳しく解説します。

データの取得：条件指定の最後に