Delete – Hymn

国土数値情報の避難施設のポイントデータをSQL Serverにアップロードする

　全国には避難施設が約 12 万箇所ある．それらの位置データを SQL Server にアップロードしたい．何度か試行錯誤の結果アップロードに成功したので備忘録として公開する．

　国土数値情報ダウンロードサービスには医療機関や医療圏の位置情報もある．今回は医療機関の Point データをダウンロードし，SQL Server にアップロードする方法を見つけたので備忘録として記載する．

　最高気温と熱中症の搬送人数との間に相関関係はあるだろうか．熱中症で救急搬送された人数は総務省の消防庁のサイトにある．これと気象庁のデータを結合してみた．

　ADO はバージョンにより微妙にクラスが異なる．オブジェクトブラウザーからクラスとメンバーを抽出して比較してみた．

　『エンジニアのためのWord再入門講座』を読み進めている．スタイルの扱いが重要であることは分かった．惜しいのは，VBA のオブジェクトからの視点がないことである．筆者の主観ではオブジェクトの視点があると理解が早まる気がしている．完全に自分のための備忘録である．

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

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

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

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

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

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

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

　e-Stat を渉猟していると面白いファイルを見つけた．国勢調査は 1920 年から開始されており， 2020 年 3 月現在では最新の調査結果は 2015 年のものである．20 回分の人口データが一つのファイルにまとめられており，グラフ化するには格好のデータである．

　年齢（5歳階級），男女別-都道府県（大正9年～平成27年）というファイルである．リンク先のページにはファイルが 3 つあるが，最後のものが最も粒度が細かいので，これをグラフ化する．

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

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

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