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