EnableOtherPagesInSection 属性

       

如果该属性值为 True,则可为本节中除首页之外的所有页面设置页面边框。Boolean 类型,可读写。

示例

本示例为所选内容的第一节除首页外的所有页面添加边框。

Dim borderLoop As Border

With Selection.Sections(1)
    .Borders.EnableFirstPageInSection = False
    .Borders.EnableOtherPagesInSection = True
    For Each borderLoop In .Borders
        borderLoop.ArtStyle = wdArtBabyRattle
        borderLoop.ArtWidth = 22
    Next borderLoop
End With