本示例向主页脚添加一个右对齐的页码,该页脚位于活动文档的第一节。

With ActiveDocument.Sections(1).Footers(wpsHeaderFooterPrimary)
    .PageNumbers.Add PageNumberAlignment:=wpsAlignPageNumberRight
End With