PageSetup.LeftMarginを使ったWord VBAのサンプル

動作検証バージョン：64bit Windows 10 Pro + 32bit Word（バージョン2209 ビルド15629.20156 Microsoft Store）

「word PageSetup.LeftMargin」
という検索キーワードでアクセスがありました。

Word VBAの、PageSetupオブジェクトに用意されているLeftMarginプロパティについて調べていた方による検索でしょう。

LeftMarginを取得するサンプルマクロ

以下のWordマクロを実行すると、アクティブ文書の左余白のサイズがメッセージボックスに表示されます。

Sub 左余白を確認する()
　MsgBox _
　　PointsToCentimeters(ActiveDocument.PageSetup.LeftMargin) & "cm"
End Sub

PageSetup.LeftMarginプロパティで取得できる数値の単位はポイントですから、

Word VBAのグローバルメンバーのPointsToCentimetersメソッドで、センチメートルに変換しています。

以下のWordマクロを実行すると、アクティブ文書の左余白のサイズが1cｍ広がります。

Sub 左余白を変更する()
　With ActiveDocument.PageSetup
　　.LeftMargin = .LeftMargin + CentimetersToPoints(1)
　End With
End Sub

CentimetersToPointメソッドの引数に「1」を指定することで、1cmをポイント数に変換した値を、現在のLeftMarginの値に足し算することで、左余白を変更しています。

Excel VBAユーザーのためのWord VBA入門（1）: Document・Range・Selectionの基本編

伊藤潔人 2021-02-17

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

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

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

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

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

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

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

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

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

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

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

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

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