VBAで複数シート出力しシートごとにページ数を表示させる方法

（追記） ページ数を頑張って取得していたけれど、PageSetupのFirstPageNumberオプションを設定することで簡単に表示することができることがわかったのでわりと根幹部を更新しました。 このオプションをどう使うかというだけの話でしかないですが、検索すると上位にでてくるQAサイトなどではいけていないやり方が多いのでこの記事は残しておきます。 前置き こんにちは。 RubyやRailsだと問題にぶつかってもだいたいググればドキュメントやStackOverflow、Qiitaでいい記事が見つかって解決するのですが、VBAはそうではありません。 玉石混交のQAサイト、情報の少ない公式ドキュメント（もしかしたら本当の情報が掲載されたドキュメントがあるのではという気もする）、なまじエラーメッセージなど日本語対応しているために英語で検索しにくいという問題もあります。 そのために、高度なプログ