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.