Word VBAで下からのフッター位置を取得する

動作検証バージョン：Windows 11 Home + 64bit Word バージョン 2403（ビルド17425.20000クイック実行）ベータチャネル

「WordVBA 下からフッターの位置」
といった検索キーワードでアクセスがありました。

［スポンサードリンク］

下からのフッター位置とは

Wordでフッターをアクティブにすると表示される［ヘッダーとフッター］タブには、下図のような［下からのフッター位置］欄に、フッターが用紙の端からどれくらい離れているのかが表示されます。

同じ値が、［ページ設定］ダイアログボックス－［その他］タブの［ヘッダーとフッター］－［用紙の端からの距離］欄にも表示されています。

この値をWord VBAで取得するには、どのようなコードを書けばいいのかを調べていらしたのでしょうか。

以下のWordマクロを実行すると、アクティブ文書の下からのフッター位置がイミディエイトウィンドウに出力されます。

Sub フッター位置を取得する()
　With ActiveDocument.PageSetup
　　Debug.Print PointsToMillimeters(.FooterDistance)
　End With
End Sub

下からのフッター位置を取得できます。

以下のようなコードを実行すると、ポイント単位で下からのフッター位置がイミディエイトウィンドウに出力されます。

Debug.Print ActiveDocument.PageSetup.FooterDistance

ポイント単位よりミリメートル単位のほうがわかりやすいでしょうから、上記のマクロではPointsToMillimetersメソッドで

ミリメートルに変換した値を出力しています。

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

3年前(2021年4月)の
人気記事

「ページ設定・PageSetup」の記事一覧