通过

Borders.JoinBorders 属性 (Word)

  • 项目

如果删除段落和表格边缘的垂直边框，以使水平边框与页面边框相连，则该属性值为 True。 读/写 Boolean。

语法

expression。 JoinBorders

表达 返回“Borders”对象的表达式。

示例

本示例为所选内容的第一节中的每页添加边框。 本示例还删除段落和表格边缘的垂直边框，以使水平边框能与页面边框相连。

Dim borderLoop As Border 
 
With Selection.Sections(1) 
 For Each borderLoop In .Borders 
 borderLoop.ArtStyle = wdArtBalloonsHotAir 
 borderLoop.ArtWidth = 15 
 Next borderLoop 
 With .Borders 
 .DistanceFromLeft = 2 
 .DistanceFromRight = 2 
 .DistanceFrom = wdBorderDistanceFromText 
 .JoinBorders = True 
 End With 
End With

另请参阅

边框集合对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。