Objeto RulerGuides (Publisher)

Uma coleção de RulerGuide objetos que representa uma linha de grade usada para alinhar objetos em uma página.

Comentários

Use o método Add para adicionar linhas de grade de régua à coleção RulerGuides .

A contagem de uso propriedade para retornar o número total de guias de régua horizontais e verticais, na coleção.

Exemplo

Este exemplo cria guias de régua horizontais e verticais a cada meia polegada (1,27 centímetros) na primeira página da publicação ativa.

Sub SetRulerGuides() 
 Dim intCount As Integer 
 Dim intPos As Integer 
 With ActiveDocument.Pages(1).RulerGuides 
 For intCount = 1 To 16 
 intPos = intPos + 36 
 .Add Position:=intPos, Type:=pbRulerGuideTypeVertical 
 Next intCount 
 intPos = 0 
 For intCount = 1 To 21 
 intPos = intPos + 36 
 .Add Position:=intPos, Type:=pbRulerGuideTypeHorizontal 
 Next intCount 
 End With 
End Sub

O exemplo a seguir usa a propriedade Count para criar um loop que exclui cada um dos guias de régua na coleção.

Sub RemoveAllGuides() 
 Dim intCount As Integer 
 With ActiveDocument.Pages(1).RulerGuides 
 For intCount = 1 To .Count 
 .Item(1).Delete 
 Next intCount 
 End With 
End Sub

Métodos

• Add

Propriedades

• Aplicativo
• Count
• Item
• Parent

Confira também

• Referência de modelo de objeto 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.