NumberingRule Property Example

This example restarts endnote numbering after each section break in the active document.

ActiveDocument.Endnotes.NumberingRule = wdRestartSection

If the footnote numbering in section one is set to restart after each section break, this example sets the numbering to restart on each page.

Set myRange = ActiveDocument.Sections(1).Range
If myRange.Footnotes.NumberingRule = wdRestartSection Then
    myRange.Footnotes.NumberingRule = wdRestartPage
End If