Word VBA教程:DistanceFromBottom属性

返回或设置文本与边框底边的距离(以磅为单位)。Long 类型,可读写。

注意   为页面边框设置本属性时,既可设置为文本与页面边框底边的距离,也可设置页面底边与页面边框底边的距离。用何种参照来设置该距离,取决于DistanceFrom属性的值。

VBA示例

本示例为活动文档的第一个段落添加边框,并将文本与底边边框的距离设置为 6 磅。


With ActiveDocument.Paragraphs(1).Borders
    .Enable = True
    .DistanceFromBottom = 6
End With

本示例为 Sales.doc 中的每张表格添加边框。然后将文本与上下边框的距离设置为 3 磅,将文本与左右边框的距离设置为 6 磅。


Dim tableLoop As Table
For Each tableLoop In Documents("Sales.doc").Tables
    With tableLoop.Borders
        .OutsideLineStyle = wdLineStyleSingle
        .OutsideLineWidth = wdLineWidth150pt
        .DistanceFromBottom = 3
        .DistanceFromTop = 3
        .DistanceFromLeft = 6
        .DistanceFromRight = 6
    End With
Next tableLoop

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号