Creating Different Odd- and Even-Page Headers
Sub diff() ActiveDocument.Sections(1).PageSetup.OddAndEvenPagesHeaderFooter = True End Sub