本示例为活动文档中除首页之外的每页添加居中的页码(为首页创建一个独立的页眉)。

With ActiveDocument.Sections(1).Headers(wpsHeaderFooterPrimary)
    .PageNumbers.Add _
    PageNumberAlignment:=wpsAlignPageNumberCenter, _
    FirstPage:=False
End With