Co-evolution of human and technology
e-Stat を渉猟していると面白いファイルを見つけた．国勢調査は 1920 年から開始されており， 2020 年 3 月現在では最新の調査結果は 2015 年のものである．20 回分の人口データが一つのファイルにまとめられており，グラフ化するには格好のデータである．
年齢（5歳階級），男女別-都道府県（大正9年～平成27年）というファイルである．リンク先のページにはファイルが 3 つあるが，最後のものが最も粒度が細かいので，これをグラフ化する．
人口統計は最も重要な基幹統計の一つである．総務省の e-Stat は確かに有用であるが，かゆいところに手が届かない．例えば「市区町村ごと，年齢５歳階級ごとの人口構成の国勢調査ごとの推移を知りたい」という要求には全く無力である．
主として技術的な理由によるものと，統計調査の粒度の細かさによる．技術的な理由としては，データベースの画面表示セル数の上限を容易に超えてしまうデータ量になってしまうことである．しかし，根本的な理由は調査の粒度の細かさである．
2005 年以前と 2010 年以降とでは調査の精度が違う．今後は高精度なデータファイルが e-Stat に掲載されていくものと思われるが，2005 年以前に関しては都道府県より細かい粒度は存在しない．そこを求めると手作業になってしまい，現実的ではない．国立社会保障・人口問題研究所ならデータを持っているかもしれない．
2020 年は国勢調査の年にあたる．総務省にはできるだけ細かい粒度でのデータ掲載を望むものである．
これまでは日本の都市人口の過去の推移を見てきた．総務省には日本の都市人口の推移予測がある．今回はこのデータをグラフにする．
データを可視化するにあたり，重要なのは引き算である．強調すべき系列のみを強調するために，VBA の知識が欠かせない．
グラフの系列にデータラベルを表示する方法にはいくつかある．
「おい，新米 Range オブジェクト！何ボーッと突っ立ってんだよ」
「す，すみません！」
「お前，名前は？」
「は，はい．myRng1と申します．よろしくお願いいたします」
「仕事に来たら，まず名乗れ．それがここの流儀だ」
「それから，自分の職域も一緒に言うんだ．わかったか？」
「は，はい」
「最初に書いてあるだろ？Option Explicit ってな．俺も詳しくは知らねぇが，あのルールは絶対だ．名乗らない奴に居場所はない…ほら，仕事が来たぞ」
「何い？誰だ，こんな糞コード書いたのは？ワークシートに何回アクセスさせる気だよ，全く…ほれ，ここからあそこまで走って値を取ってこい」
「ここからあそこまでって…えーっ？本気で言ってます？」
「何言ってるんだ？ワークシートにアクセスするような力仕事は新米 Range オブジェクトの役割と相場が決まってるんだ．さあ行った行った」
EXCEL VBAで複数の散布図を敷き詰めて並べるでは散布図を都道府県の数だけ敷き詰めて並べた．今回はその散布図一つ一つにデータ系列を追加する．
データベースに接続して一つのテーブルをインポートするのは比較的簡単であるが，複数のテーブルを結合した状態でインポートする方法が長らく分からないままだった．
Power Query を使ってクエリを結合する方法で解決したので備忘録がてら記事とする．
総務省の e-Stat から全国の市区町村の財政状況を垣間見る．衰退する都市には財政破綻の徴候が見られるはずである．今回は財政力指数，経常収支比率，実質公債費比率，地方債現在高に注目する．
総務省統計ポータル e-Stat からのデータに全国の市区町村の人口推移があった．マーク・ブキャナンの「歴史はべき乗則で動く」の p 261 に「人口が半分の都市は四つある」とある．本当だろうか．検証してみた．
EXCEL VBA に至る前の段階としてマクロの記録がある．いわゆる「表モード」をそのまま記録したものである．ソートはこれまで .Add メソッドが中心であったが，最近になって .Add2 メソッドが追加された．それに伴い，引数 Key の Range オブジェクトの記述が若干変わった．