Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
True si l' objet WebNavigationBarSet spécifié a une orientation horizontale. Boolean (en lecture seule).
Syntaxe
expression. IsHorizontal
expression Variable qui représente un objet WebNavigationBarSet .
Valeur renvoyée
Booléen
Remarques
Cette propriété est utilisée pour déterminer l'orientation de la barre de navigation définie avant de définir certaines propriétés propres à une orientation horizontale, telles que la propriété HorizontalAlignment.
Exemple
Cet exemple montre comment ajouter la première barre de navigation de la collection WebNavigationBarSets du document actif à chaque page, puis définir le style de bouton sur petit.
Un test est effectué pour déterminer si la barre de navigation définie est horizontale. Si ce n’est pas le cas, la méthode ChangeOrientation est appelée et l’orientation est définie sur horizontale. Une fois que la barre de navigation est orientée horizontalement, le nombre de boutons horizontaux est défini sur 3 et l’alignement horizontal des boutons est défini sur 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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.