PowerPoint) (ShapeRange.IncrementTop 方法

會以指定的點數為遞增值，垂直移動指定的圖案範圍。

語法

運算式。IncrementTop (遞增)

表達 代表 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 支援與意見反應。