Compartir a través de


Propiedad WebNavigationBarSet.IsHorizontal (Publisher)

True si el objeto WebNavigationBarSet tiene una orientación horizontal. Boolean de solo lectura.

Sintaxis

expresión. IsHorizontal

expresión Variable que representa un objeto WebNavigationBarSet .

Valor devuelto

Booleano

Comentarios

Esta propiedad se utiliza para determinar la orientación de la barra de exploración antes de establecer determinadas propiedades que suponen una orientación horizontal, como la propiedad HorizontalAlignment.

Ejemplo

En este ejemplo se agrega la primera barra de navegación de la colección WebNavigationBarSets del documento activo a cada página y, a continuación, se establece el estilo del botón en pequeño.

Se realiza una prueba para determinar si el conjunto de barras de navegación es horizontal. Si no es así, se llama al método ChangeOrientation y la orientación se establece en horizontal. Una vez que la barra de navegación está orientada horizontalmente, el recuento de botones horizontal se establece en 3 y la alineación horizontal de los botones se establece en 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.