ShapeRange.IncrementTop メソッド (Publisher)

指定した図形または図形範囲を、指定した距離だけ垂直方向に移動します。

構文

式。IncrementTop (インクリメント)

式ShapeRange オブジェクトを表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
Increment	必須	バリアント型 (Variant)	図形または図形の範囲を移動する垂直方向の距離。 正の値を指定すると、図形または図形の範囲が下に移動します。負の値を指定すると、その値が上に移動します。 数値は ポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。

戻り値

なし

解説

図形または図形範囲を水平方向に移動するには、 IncrementLeft メソッドを使用します。

例

次の使用例は、作業中の文書の 1 つ目の図形を複製し、その複製に塗りつぶしを設定し、70 ポイント右、50 ポイント上に移動し、時計方向に 30 度回転します。

With ActiveDocument.Pages(1).Shapes(1).Duplicate 
 .Fill.PresetTextured PresetTexture:=msoTextureGranite 
 .IncrementLeft Increment:=70 
 .IncrementTop Increment:=-50 
 .IncrementRotation Increment:=30 
End With

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。