akashi_keirin https://blog.hatena.ne.jp/akashi_keirin/ 素人がExcelVBAによる「一人働き方改革」に挑むブログ https://akashi-keirin.hatenablog.com/ WordVBA VBA覚書 各ページの行数を取得する(Word) Wordドキュメントの、各ページの行数を調べる方法を編み出した（笑）ので、覚書として記しておく。 カーソルのあるページの総行数を取得する [Document].Bookmarks.Item("\Page")の返り値 BookmarksコレクションのItemメソッドのIndexに"\Page"を指定すると、カーソルのあるページ全体を表すBookmarkオブジェクトが返るっぽい。 たとえば、テキトーなページのどこかにカーソルを置いて、イミディエイト・ウィンドウに ActiveDocument.Bookmarks("\Page").Select と打ち込んで[E… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fakashi-keirin.hatenablog.com%2Fentry%2F2020%2F05%2F27%2F215521" title="各ページの行数を取得する(Word) - 素人がExcelVBAによる「一人働き方改革」に挑むブログ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/a/akashi_keirin/20200527/20200527215135.jpg Hatena Blog https://hatena.blog 2020-05-27 21:55:21 rich https://akashi-keirin.hatenablog.com/entry/2020/05/27/215521 1.0 100%