IncrementLeft 方法

以指定的磅数为增量，水平移动指定的图形。

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

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

示例

本示例复制 myDocument 上的第一个图形，设置所复制的图形的填充格式，将其向右移动 70 磅，向上移动 50 磅，然后按顺时针方向旋转 30 度。

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