IncrementLeft 方法

按指定磅值水平移动指定的图形。

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

Increment   Single 类型，必需。指定水平移动的距离，以磅为单位。正数值右移图形，负数值左移。

示例

本示例在 myDocument 中复制图形 1，为复制的图形设置填充格式，将其右移 70 磅，上移 50 磅，并顺时针旋转 30 度。

Set myDocument = ActiveDocument
With myDocument.Shapes(1).Duplicate
    .Fill.PresetTextured msoTextureGranite
    .IncrementLeft 70
    .IncrementTop -50
    .IncrementRotation 30
End With