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