Compartilhar via

Propriedade WebNavigationBarSet.IsHorizontal (Publisher)

  • Artigo

True se WebNavigationBarSet especificado tem uma orientação horizontal. Boolean somente leitura.

Sintaxe

expressão. IsHorizontal

Expressão Uma variável que representa um objeto WebNavigationBarSet .

Valor de retorno

Booliano

Comentários

Essa propriedade é usada para determinar a orientação da barra de navegação definido antes de se configurar determinadas propriedades que supõem uma orientação horizontal, como a propriedade HorizontalAlignment.

Exemplo

Este exemplo adiciona a primeira barra de navegação na coleção WebNavigationBarSets do documento ativo a cada página e define o estilo do botão como pequeno.

Um teste é realizado para determinar se o conjunto de barras de navegação é horizontal. Se não for, o método ChangeOrientation será chamado e a orientação será definida como horizontal. Depois que a barra de navegação é orientada horizontalmente, a contagem de botões horizontal é definida como 3 e o alinhamento horizontal dos botões é definido como pbnbAlignLeft.

Dim objWebNav As WebNavigationBarSet 
Set objWebNav = ActiveDocument.WebNavigationBarSets(1) 
With objWebNav 
 .AddToEveryPage Left:=10, Top:=10 
 .ButtonStyle = pbnbButtonStyleSmall 
 If .IsHorizontal = False Then 
 .ChangeOrientation pbNavBarOrientHorizontal 
 End If 
 .HorizontalButtonCount = 3 
 .HorizontalAlignment = pbnbAlignLeft 
End With

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.