Setting the Footnote Numbering option: Return to List

  With ActiveDocument.Footnotes
  
    .StartingNumber = 1
  
    .NumberStyle = wdNoteNumberStyleArabic
  
    .NumberingRule = wdRestartSection
  
End With

Note to Webmaster