次の方法で共有

Shapes.AddPolyline メソッド (PowerPoint)

  • [アーティクル]

折れ線または閉じた多角形の描画を作成します。 新しい折れ線または多角形を表す Shape オブジェクトを返します。

構文

式。 AddPolyline( _SafeArrayOfPoints_ )

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

パラメーター

名前 必須 / オプション データ型 説明
SafeArrayOfPoints 必須 バリアント型 (Variant) 折れ線の頂点を指定する座標値の配列を指定します。

戻り値

Shape

注釈

閉じた多角形を作成するには、折れ線の始点と終点に同じ座標値を指定します。

例

次の使用例は、myDocument に三角形を追加します。 最初の点と最後の点が同じ座標値であるため、この多角形は閉じており、塗りつぶされます。 三角形の内部の色は、オートシェイプの既定値である塗りつぶしの色と同じになります。

Dim triArray(1 To 4, 1 To 2) As Single

triArray(1, 1) = 25

triArray(1, 2) = 100

triArray(2, 1) = 100

triArray(2, 2) = 150

triArray(3, 1) = 150

triArray(3, 2) = 50

triArray(4, 1) = 25     ' Last point has same coordinates as first

triArray(4, 2) = 100

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.AddPolyline SafeArrayOfPoints:=triArray

関連項目

Shapes オブジェクト

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

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