EXCELのワークシートに対してSQL文で問い合わせを行いデータを取得する方法(VBA)

EXCELでSQLサンプル こんな感じのEXCELのワークシートに対してSQL文を発行し、結果を取得する方法です。 １行目をフィールド名と見立てて、Where句でデータを絞り込んだり、ソートしたりすることが可能です。 以下のサンプルコードでは自ワークブック(*.xls,*.xlsm等)に対しADOでEXCELファイルをオープンし、SELECT文を発行しています。 実際に動くEXCEL VBAのサンプルプログラムは一番下にあります。 ここで書いているSQLはANSI-92 SQL相当なので、以下のことが可能です。 WHERE句、LIKE等も使用可ORDER BYGROUP BYでSUMやCOUNTなどが使える複数の表をJOINで結合サブクエリを含める１つのシート上の特定範囲を複数のテーブルとして結合 VBAコード例 Public Sub MyADOExcel() Const adOpenKe