Sorry 'bout that. Here's the part of the code that I have for setting page numbers:
With Selection.Find
    .Text = Chr(13) + "<IntentionalBlankCheck"
    .Replacement.Text = ""
    .Wrap = wdFindContinue
End With

If Selection.Find.Execute = True Then
    Selection.EndKey unit:=wdLine, Extend:=wdExtend
    If Selection.Text = Chr(13) + ""<IntentionalBlankCheck-SectionBreak>" + Chr(13) Then
        'Reset Numbering to not start numbering at section breaks
        ActiveDocument.Sections(currSect).Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = False
        'Delete the text, add Section break and check if on an even or odd page
        'If on even page, then add "This Page Intentionally Left Blank."
    ElseIf Selection.Text = Chr(13) + ""<IntentionalBlankCheck-Section1>" + Chr(13) Then
        'Delete the text, add Section break and check for even/odd page as above
       
        '**************Code to set Starting number to 1********************
        currSect = Selection.Information(wdActiveEndSectionNumber)
        ActiveDocument.Sections(currSect).Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = True
        ActiveDocument.Sections(currSect).Footers(wdHeaderFooterPrimary).PageNumbers.StartingNumber = 1
    End If
As you can see, I have code that sets the Restart Numbering variable to false [I]every[I] time I see anything other than -Section1> just to be safe, but it still keeps starting sections at page 1.