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 支持和反馈，获取有关如何接收支持和提供反馈的指南。