使用英语阅读

通过


Word) (Borders.Enable 属性

返回或设置边框的格式指定的对象。 读/写 Long

语法

expressionEnable

表达 一个代表“Borders”集合的变量。

备注

如果边框格式应用于指定对象的全部或部分, 启用 属性会返回或 wdUndefined则为 True 。 可以设置为 WdLineStyle 常量。

启用 属性将应用于指定对象的所有边框。 True 将线型设置为默认样式,线条宽度设置为默认线条宽度。 可以使用 DefaultBorderLineWidthDefaultBorderLineStyle 属性设置的默认线条样式和线条宽度。

若要从对象中删除所有边框, 启用 属性设置为 False ,如下面的示例中所示。

ActiveDocument.Tables(1).Borders.Enable = False

若要删除或应用单个边框,请使用 Borders (索引) (其中 indexWdBorderType 常量)返回单个边框,然后设置 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。