Нумерация страниц в слове, начиная с другой страницы

Question

Я пытаюсь помочь другу. Она пишет дипломную работу бакалавра, и ее учитель испортил документ, изучая его. Появляется много разрывов страниц и других вещей, которые не позволяют мне поставить нормальную нумерацию страниц. Так как я не могу использовать нормальную нумерацию, я использовал скрипт для нумерации всех страниц от 1 до 64. Но я хочу, чтобы нумерация была видимой, начиная с 8-й страницы (с 8 по 64). Как мне отредактировать следующий скрипт для этого?

 Dim secNum As Long
Dim btnCancel ' give user chance to cancel
Dim bTrackChanges As Boolean
btnCancel = MsgBox(prompt:="Do you want to reset all of the page numbers in this document to number continuously?", _
    Title:="Are you sure?", _
    Buttons:=vbYesNo)
If btnCancel = vbNo Then
    MsgBox prompt:="Reset of continuous page numbering cancelled by user!", Buttons:=vbExclamation, Title:="Page Number Reset Cancelled!"
    Exit Sub
End If
bTrackChanges = ActiveDocument.TrackRevisions 'Graham Mayor
ActiveDocument.TrackRevisions = False ' Graham Mayor
With ActiveDocument
    For secNum = 2 To .Sections.Count
        .Sections(secNum).Headers(wdHeaderFooterPrimary) _
             .PageNumbers.RestartNumberingAtSection = False
    Next
End With
ActiveDocument.TrackRevisions = bTrackChanges 'Graham Mayor
MsgBox prompt:="The Continuous Page Numbers macro has run.", Title:="Page number reset macro finished!"