IsTwoPageMaster Property

Microsoft Publisher Visual Basic

IsTwoPageMaster Property

True if the specified Page object is a two-page master. Read/write Boolean.

expression.IsTwoPageMaster

expression    Required. An expression that returns a Page object from the MasterPages collection.

Remarks

This method works for master pages only. Returns a This feature is only for master pages error when attempting to access this property from a publication page object.

Example

The following example adds text to each header of a two-page master page specifying the master page PageNumber and its place in the spread: 1 or 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