ThisWorkbook

EXCEL VBAで複数のブックからタブ区切りテキストに一括で別名保存する

　最近，Lancersを利用する機会があった．月次のファイルを10年分，計120個のブックをダウンロードし，テーブル形式に整形したブックが納品された．これらをSQL Serverにインポートしたいのだが，手動でタブ区切りテキストに別名保存するのは骨が折れる．

　結局VBAで処理することにした．その際の備忘録である．

　Power Query が使えないと不便である．先日 EXCEL 2010 の素の環境でフォルダ内のブックをすべて開き，データを読み込む必要があったのだが，Power Query が使えなかったため，VBA でブックを開いて読み込まなければならなかった．備忘録としての記事である．

　この記事はPower Query でフォルダから複数ファイルを一括インポートすると対応している．やっていることは同じだが，.xls 形式だとクエリの検証に時間がかかるため，VBA で読み込んだほうが動作は早いかもしれない．

　フォルダー内のファイル一覧を取得するには FileSystemObject を使う場合と Dir() 関数を使う方法とがある．ここでは FileSystemObject を使うことにする．

　データは Range オブジェクトに格納されているため，Range オブジェクトを取得するのが当面の目標となる．

　Officeテーマの色空間を探索するではオブジェクトテーマカラーについて探索した．今回は配色の方を探索する．

　EXCEL VBA から見たオブジェクトテーマカラーと RGB の変換では Office テーマの一部について触れた．今回は Office テーマ全体を主に色彩の点から俯瞰する．

　人口統計は国の将来を予測する重要な指標であるが，経済の指標である総生産も重要な指標である．これは国の元気さを示す値であり，報道では GDP と称されている．一人あたりの GDP とは生産性のことであり，国民の豊かさを示す値でもある．

　マクロ経済学についてはほぼ素人だが，データを扱うにあたり，都道府県ごとの総生産額と生産性は欠かせない指標と思われたので，調査ついでに公開しよう．