Hi -
I've searched various forums for the following, but can't find exactly what I need (or else can't recognize it if it exists).

I have a document that with a section break at the end of each page that I need to have numbered continuously across all sections. I also need the numbering to start with '0.' Somewhere I found a macro that numbers the document continuously (shown below), but it starts with 1, not 0. Could anyone tell me what needs to be added or changed to have it start with 0?

TIA!! (obviously, I do not know anything about VBA, other than to know it exists and can be magic )

Here's the existing code (which someone else wrote):

Sub ContinuePageNumbers()

Dim sec As Section


On Error GoTo Done
Application.ScreenUpdating = False

With ActiveDocument.ActiveWindow.View
.SeekView = wdSeekPrimaryFooter
End With

For Each sec In ActiveDocument.Sections
sec.Footers(wdHeaderFooterPrimary).Range.Select
Selection.HeaderFooter.PageNumbers.RestartNumberin gAtSection = False
DoEvents
Next sec

With ActiveDocument.ActiveWindow.View
.SeekView = wdSeekMainDocument
End With


Selection.HomeKey

Done:
Application.ScreenUpdating = True
End Sub

Thanks again.