如果该属性值为 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