RestartNumberingAtSection Property Example

This example adds page numbers to the headers in the active document, and then it sets page numbering to start at 1 again at the beginning of each section.

ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary) _
    .PageNumbers.Add Pagenumberalignment:=wdAlignPageNumberCenter
For Each s In ActiveDocument.Sections
    With s.Headers(wdHeaderFooterPrimary).PageNumbers
        .RestartNumberingAtSection = True
        .StartingNumber = 1
    End With
Next s