Share via


PowerPoint) (ShapeRange.IncrementLeft 方法

會以指定的點數為遞增值,水平移動指定的圖案範圍。

語法

expressionIncrementLeft( _Increment_ )

表達 代表 ShapeRange 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
Increment 必要 Single 會指定要水平移動圖案範圍的距離 (以點為單位)。 正值會讓圖案範圍向右移動,負值會讓圖案範圍向左移動。

範例

本範例複製 myDocument 上的第一個圖案,設定複製圖案的填滿格式,將其向右移動 70 點,向上移動 50 點,然後按順時針方向旋轉 30 度。

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes(1).Duplicate

    .Fill.PresetTextured msoTextureGranite

    .IncrementLeft 70

    .IncrementTop -50

    .IncrementRotation 30

End With

另請參閱

ShapeRange 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應