Borders.DistanceFrom 属性 (Word)

项目
04/07/2023

返回或设置一个值，该值指示指定的页面边框从页面边缘测量还是从环绕的文本。读/写 WdBorderDistanceFrom 。

语法

expression. DistanceFrom

表达式是必需的。一个代表“Borders”集合的变量。

示例

本示例为活动文档中第一节的每个页面添加单线型边框，然后设置每个边框到页面边缘的距离。

Dim borderLoop As Border 
 
With ActiveDocument.Sections(1) 
 For Each borderLoop In .Borders 
 borderLoop.LineStyle = wdLineStyleSingle 
 borderLoop.LineWidth = wdLineWidth050pt 
 Next borderLoop 
 With .Borders 
 .DistanceFrom = wdBorderDistanceFromPageEdge 
 .DistanceFromTop = 20 
 .DistanceFromLeft = 22 
 .DistanceFromBottom = 20 
 .DistanceFromRight = 22 
 End With 
End With

本示例为所选内容的第一节的每个页面添加边框，然后将文本与页面边框的距离设置为 6 磅。

Dim borderLoop As Border 
 
With Selection.Sections(1) 
 For Each borderLoop In .Borders 
 borderLoop.ArtStyle = wdArtSeattle 
 borderLoop.ArtWidth = 22 
 Next borderLoop 
 With .Borders 
 .DistanceFrom = wdBorderDistanceFromText 
 .DistanceFromTop = 6 
 .DistanceFromLeft = 6 
 .DistanceFromBottom = 6 
 .DistanceFromRight = 6 
 End With 
End With

另请参阅

边框集合对象

支持和反馈

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