Объект MasterPages (издатель)

Представляет главную страницу для публикации, после которой будут разработаны все страницы публикации. Объект MasterPages — это коллекция объектов Page .

Замечания

Используйте свойство Document.MasterPages для возврата объекта MasterPages .

Используйте свойство Page.Shapes для работы с автофигурами и текстовыми полями на главной странице.

Пример

В следующем примере на главную страницу добавляются две направляющие линейки, чтобы каждая страница активной публикации была разделена на четверти.

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

Методы

• Add
• FindByPageID

Свойства

• Приложение
• Count
• Item
• Parent

См. также

• Справочник по объектной модели издателя

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.