Objeto MasterPages (Publisher)

Representa uma página mestra para uma publicação após o qual serão criadas todas as páginas na publicação. Objeto MasterPages é uma coleção de página objetos.

Comentários

Utilize a propriedade Document.MasterPages para devolver um objeto MasterPages .

Utilize a propriedade Page.Shapes para trabalhar com formas automáticas e caixas de texto na página master.

Exemplo

O exemplo a seguir adiciona dois guias de régua à página mestra para que cada página na publicação ativa é dividida em trimestres.

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

Este exemplo adiciona uma pequena forma de coração vermelho ao canto superior esquerdo da página master que será apresentada em cada página na publicação ativa.

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

Métodos

• Add
• FindByPageID

Propriedades

• Application
• Count
• Item
• Parent

Confira também

• Referência do Modelo de Objeto do Publisher

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.