Propriedade WebNavigationBarSet.IsHorizontal (Publisher)

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, em seguida, define o estilo do botão como pequeno.

É realizado um teste para determinar se o conjunto de barras de navegação é horizontal. Se não for, o método ChangeOrientation é chamado e a orientação é definida como horizontal. Depois de a barra de navegação ser 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.