Shapes.AddShape メソッド (PowerPoint)

オートシェイプを作成します。 新しいオート シェイプ を表す Shape オブジェクトを返します。

構文

AddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

表現Shapes オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
必須 MsoAutoShapeType 作成するオートシェイプの種類を指定します。
Left 必須 単精度浮動小数点型 (Single) スライドの左端を基準にオートシェイプの左端の位置をポイント単位で指定します。
Top 必須 単精度浮動小数点型 (Single) スライドの上端を基準にオートシェイプの上端の位置をポイント単位で指定します。
Width 必須 単精度浮動小数点型 (Single) オートシェイプの幅をポイント単位で指定します。
Height 必須 単精度浮動小数点型 (Single) オートシェイプの高さをポイント単位で指定します。

戻り値

Shape

注釈

追加したオートシェイプの種類を変更するには、 図形 のプロパティを設定します。

次の使用例は、myDocument に四角形を追加します。

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddShape Type:=msoShapeRectangle, _ 
    Left:=50, Top:=50, Width:=100, Height:=200

関連項目

Shapes オブジェクト

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

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