OddAndEvenPagesHeaderFooter Property

Microsoft Word Visual Basic

object has different headers and footers for odd-numbered and even-numbered pages. Can be True, False, or wdUndefined. Read/write Long.

expression.OddAndEvenPagesHeaderFooter

expression    Required. An expression that returns a PageSetup object.

Example

This example creates different headers and footers for odd-numbered and even-numbered pages in Document1.

Set myDoc = Documents("Document1")
myDoc.PageSetup.OddAndEvenPagesHeaderFooter = True
With myDoc.Sections(1)
    .Headers(wdHeaderFooterPrimary).Range _
        .InsertAfter "Odd Header"
    .Headers(wdHeaderFooterEvenPages).Range _
        .InsertAfter "Even Header"
End With