Propriété Page.IsTwoPageMaster (Publisher)
True si l'objet Page spécifié est une page maître double. Boolean (en lecture/écriture).
Syntaxe
expression. IsTwoPageMaster
Expression Variable qui représente un objet Page .
Valeur renvoyée
Booléen
Remarques
Cette méthode ne fonctionne que pour les pages maîtres. Retourne une erreur « Cette fonctionnalité est uniquement destinée aux pages maîtres » lors de la tentative d’accès à cette propriété à partir d’un objet de page de publication.
Exemple
L'exemple suivant ajoute du texte à chaque en-tête d'une page maître double en indiquant le numéro de la page maître et sa position : 1 ou 2.
Dim objMasterPage As Page
Dim pageCount As Long
Dim i As Long
pageCount = ActiveDocument.MasterPages.Count
For i = 1 To pageCount
Set objMasterPage = ActiveDocument.MasterPages(i)
If objMasterPage.IsTwoPageMaster Then
objMasterPage.Header.TextRange.Text = "MasterPage " & _
objMasterPage.PageNumber & ", Page 1 of 2"
i = i + 1
Set objMasterPage = ActiveDocument.MasterPages(i)
objMasterPage.Header.TextRange.Text = "MasterPage " & _
objMasterPage.PageNumber & ", Page 2 of 2"
End If
Next i
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.