Word VBA教程:Borders集合对象

多种对象
Borders (Border)

Border对象所组成的集合,该集合代表对象的边框。

使用 Borders集合

用 Borders属性可返回 Borders集合。下面示例将默认的边框添加在活动文档首段的四周。


ActiveDocument.Paragraphs(1).Borders.Enable = True

不能在 Borders集合中添加 Border对象。在 Borders集合中元素的数量是有限制的,并且因对象的类型不同而异。例如,在 Borders集合中,表格有六个元素,而段落有四个元素。

用 Borders(index),可返回单个 Border对象,其中 index 用来标识边框。Index 可取下列 WdBorderType 常量之一:wdBorderBottom、wdBorderDiagonalDown、wdBorderDiagonalUp、wdBorderHorizontal、wdBorderLeft、wdBorderRight、wdBorderTop 或 wdBorderVertical。由于所选择或安装的语言支持(例如美国英语)不同,有些常量可能不可用。可用LineStyle属性设置 Border对象的框线类型。下列示例在活动文档首段的底端添加一个双线边框。


With ActiveDocument.Paragraphs(1).Borders(wdBorderBottom)
    .LineStyle = wdLineStyleDouble
    .LineWidth = wdLineWidth025pt
End With

下列示例将单线边框加在选定内容的首字符四周。


With Selection.Characters(1)
    .Font.Size = 36
    .Borders.Enable = True
End With

下列示例在第一节中每一页的四周添加艺术型边框。


For Each aBorder In ActiveDocument.Sections(1).Borders
    With aBorder
        .ArtStyle = wdArtSeattle
        .ArtWidth = 20
    End With
Next aBorder

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号