Propriété WebPageOptions.IncludePageOnNewWebNavigationBars (Publisher)

Article
04/07/2023

Renvoie ou définit une valeur booléenne qui spécifie si un lien vers une page web sera ajouté aux barres de navigation automatique des nouvelles pages. Lecture-écriture.

Syntaxe

expression. IncludePageOnNewWebNavigationBars

Expression Variable qui représente un objet WebPageOptions .

Valeur renvoyée

Booléen

Remarques

La valeur par défaut de la propriété IncludePageOnNewWebNavigationBars est False, ce qui signifie que les liens vers la page spécifiée ne sont pas ajoutés aux barres de navigation automatique des nouvelles pages.

Définir cette propriété sur False ne supprime pas les liens vers la page spécifiée des barres de navigation automatique qui en comportent déjà, mais elle n'empêche pas les liens vers la page d'être ajoutés aux barres de navigation automatique des nouvelles pages.

La définition de cette propriété sur True s’applique uniquement aux barres de navigation automatique des nouvelles pages et ne met pas à jour les barres de navigation automatique existantes dans la composition web.

Lors de l’ajout d’une nouvelle page à la composition web à l’aide de la méthode Pages.Add , le paramètre facultatif AddHyperlinkToWebNavBar peut être utilisé pour spécifier si les liens vers la nouvelle page sont ajoutés aux barres de navigation automatique existantes. La valeur de ce paramètre est utilisée pour remplir la valeur de la propriété IncludePageOnNewWebNavigationBars.

Exemple

L’exemple suivant spécifie que les liens vers la page 2 de la composition web active doivent être ajoutés aux barres de navigation automatique des nouvelles pages. Notez que si une nouvelle page est ajoutée à la composition après ce point, la propriété IncludePageOnNewWebNavigationBars sera False.

Dim theWPO As WebPageOptions 
 
Set theWPO = ActiveDocument.Pages(2).WebPageOptions 
With theWPO 
 .IncludePageOnNewWebNavigationBars = True 
End With

L'exemple suivant montre comment ajouter deux nouvelles pages à la composition à l'aide de la méthode Pages.Add. Le paramètre AddHyperlinkToWebNavBar est défini sur True, ce qui signifie que les liens vers ces deux nouvelles pages être ajoutés aux barres de navigation automatique des pages existantes.

Une autre page est ensuite ajoutée à la composition, et le paramètre AddHyperlinkToWebNavBar est omis. Cela signifie que la propriété IncludePageOnNewWebNavigationBars est False pour la page nouvellement ajoutée et des liens à cette page ne seront pas être inclus dans les barres de navigation automatique des pages existantes.

Dim thePage As page 
Dim thePage2 As page 
 
Set thePage = ActiveDocument.Pages.Add(Count:=2, _ 
 After:=4, AddHyperlinkToWebNavBar:=True) 
 
Set thePage2 = ActiveDocument.Pages.Add(Count:=1, After:=6)

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.

Partager via