Макрос Microsoft Word 2010 для перенумерації сторінок у нижньому колонтитулі всіх розділів.

Мої проблеми полягають в тому, що у мене також є роздільна сторінка, на якій спочатку я надав -1 в полі сторінки, щоб отримати відповідний рахунок. Не могли б ви повідомити, як я можу маніпулювати макрос, щоб взяти це назад у рахунок ...

Ось макрос

Sub Main()
    On Error Resume Next
    For i = 0 To ActiveDocument.Sections.Count
        ActiveDocument.Sections(i).Footers(wdHeaderFooterEvenPages).PageNumbers.RestartNumberingAtSection = False
        ActiveDocument.Sections(i).Footers(wdHeaderFooterFirstPage).PageNumbers.RestartNumberingAtSection = False
        ActiveDocument.Sections(i).Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = False
    Next i
End Sub