MasterPages オブジェクト (Publisher)
その後、文書内のすべてのページをデザインする文書のページのマスターを表します。 MasterPages オブジェクトは、 ページ のコレクション オブジェクトです。
注釈
Document.MasterPages プロパティを使用して MasterPages オブジェクトを取得します。
マスター ページでオートシェイプとテキスト ボックスを操作するには、 Page.Shapes プロパティを使用します。
例
次の使用例は、マスター ページに 2 つのルーラー ガイドを追加し、作業中の文書の各ページを 4 分割します。
Sub ChangeMasterPage()
Dim intWidth As Integer
Dim intHeight As Integer
With ActiveDocument
intWidth = .PageSetup.PageWidth
intWidth = intWidth / 2
intHeight = .PageSetup.PageHeight
intHeight = intHeight / 2
With .MasterPages(1).RulerGuides
.Add Position:=intWidth, _
Type:=pbRulerGuideTypeVertical
.Add Position:=intHeight, _
Type:=pbRulerGuideTypeHorizontal
End With
End With
End Sub
次の使用例は、作業中の文書の各ページに表示されるマスター ページの左上隅に小さな赤いハート形を追加します。
Sub AddShapeToMasterPage()
ActiveDocument.MasterPages(1).Shapes.AddShape(Type:=msoShapeHeart, _
Left:=36, Top:=36, Width:=36, Height:=36).Fill _
.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0)
End Sub
メソッド
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。