Word VBA教程:Position属性

应用于 CaptionLabel对象的 Position属性。

返回或设置题注标签文本的位置。WdCaptionPosition,可读写。

WdCaptionPosition 可以是下列 WdCaptionPosition 常量之一:
wdCaptionPositionAbove
wdCaptionPositionBelow

expression。Position

expression   必需。该表达式返回以上一个对象。

 

应用于 DropCap对象的 Position属性。

返回或设置首字下沉的位置。WdDropPosition,可读写。

WdDropPosition 可以是下列 WdDropPosition 常量之一:
wdDropNone
wdDropMargin
wdDropNormal

expression。Position

expression   必需。该表达式返回以上一个对象。

 

应用于 TabStop对象的 Position属性。

返回或设置相对于左页边距的制表位位置。Single 类型,可读写。

expression.Position

expression   必需。该表达式返回以上一个对象。

 

应用于 Font对象的 Position属性。

返回或设置相对于基准线的文本位置(以磅为单位)。正值将文本提升,负值将文本降低。Long 类型,可读写。

expression.Position

expression   必需。该表达式返回以上一个对象。

 

VBA示例

当应用于 Font对象时。

本示例将选定文本降低 2 磅。


Selection.Font.Position = -2

当应用于 TabStop对象时。

本示例为第 2 段添加一个与左页边距相距 2 英寸的右对齐制表位。然后在一个消息框中显示该制表位的位置。


With Selection.Paragraphs.TabStops
    .ClearAll
    .Add Position:=InchesToPoints(2), Alignment:=wdAlignTabRight
    MsgBox .Item(1).Position & " or " & _
        PointsToInches(.Item(1).Position) & " inches"
End With

当应用于 DropCap对象时。

本示例将活动文档的第一段设置为首字下沉格式。DropCap对象的位置将设置为 wdDropNormal。


With ActiveDocument.Paragraphs(1).DropCap
    .Enable
    .FontName= "Arial"
    .Position = wdDropNormal
End With

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号