Word) (Borders.Enable 属性
返回或设置边框的格式指定的对象。 读/写 Long。
expression。 Enable
表达 一个代表“Borders”集合的变量。
如果边框格式应用于指定对象的全部或部分, 启用 属性会返回或 wdUndefined , 则为 True 。 可以设置为 真 、 假 或 WdLineStyle 常量。
启用 属性将应用于指定对象的所有边框。 True 将线型设置为默认样式,线条宽度设置为默认线条宽度。 可以使用 DefaultBorderLineWidth 和 DefaultBorderLineStyle 属性设置的默认线条样式和线条宽度。
若要从对象中删除所有边框, 启用 属性设置为 False ,如下面的示例中所示。
ActiveDocument.Tables(1).Borders.Enable = False
若要删除或应用单个边框,请使用 Borders (索引) (其中 index 是 WdBorderType 常量)返回单个边框,然后设置 LineStyle 属性。 下面的示例删除 rngTemp
的下边框。
Dim rngTemp
rngTemp.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
本示例用于删除表格 1 中第一个单元格的所有边框。
If ActiveDocument.Tables.Count >= 1 Then
ActiveDocument.Tables(1).Cell(1, 1).Borders.Enable = False
End If
本示例为选定内容第一段四边设置虚框。
Options.DefaultBorderLineWidth = wdLineWidth025pt
Selection.Paragraphs(1).Borders.Enable = _
wdLineStyleDashSmallGap
本示例为选定内容的第一个字符设置边框。 如果没有选定内容,则为插入点后的第一个字符设置边框。
Selection.Characters(1).Borders.Enable = True
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。