タグ: VBA

2019年の熱中症搬送人員数の予測と実際をEXCELの組み合わせグラフで描く

　これまでの記事で日最高気温と平均水蒸気圧，各都道府県65歳以上人口および月から熱中症の搬送人員数を予測する回帰式の回帰係数を推定してきた．

　今回はその回帰式を元に実際のデータと比較してみたい．対象は2019年の47都道府県とする．

　eStatには納税義務者数（所得割）と課税対象所得のデータが1985年から2020年まである．今回は都道府県別の自治体ごとの納税義務者数と課税対象所得の散布図を示す．

　オブジェクトブラウザーは VBA のオブジェクト構造を記述したものである．しかし，EXCEL 全体のオブジェクトモデルを一覧できるような機能はない．今回，全く別領域のソフトウェアを用いて EXCEL のオブジェクトモデルを表現してみたので備忘録として公開する．

　EXCEL VBA から Internet Explorer を起動し，ページの構造を解析するには Microsoft HTML Object Library のクラスとメンバーを知る必要があるかもしれない．ひたすら手作業で抽出したが，全部は拾えていない．

　Internet Explorer を VBA から操作する際に参照するライブラリは Microsoft Internet Controls である．オブジェクトブラウザーからオブジェクトを抽出してみた．

　抽出作業そのものは単なるコピペである．自動で抽出する方法はないものだろうか．

　Word の規定のテーマはマクロ記録できない．EXCEL ならできる．Power Point はマクロ記録自体が廃止されている．EXCEL の記録を流用してみた．

　前回の記事ではフォルダーから一括してデータを読み込む方法を紹介した．今回は月次の更新ファイルを読み込んで既存のテーブルにデータを追記する方法を紹介する．

　既に読み込んだファイルは拒否したい．監査としてのワークシートが必要だ．リレーショナルデータベースならデータの一意制約から可能だが，EXCEL では自前で作る必要がある．

　色々と挑戦しがいのある課題であった．

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

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

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

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

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

　前回の記事では大正 9 年から平成 17 年までの日本人口総数の年齢階級推移を積み上げ縦棒グラフに描いた．今回は男女別に描く．