次の方法で共有


Shape.ConnectionSiteCount プロパティ (PowerPoint)

指定した図形の結合点の数を取得します。 値の取得のみ可能です。

構文

ConnectionSiteCount

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

戻り値

Long

次の使用例は、myDocument に 2 つの四角形を追加し、その 2 つを 2 本のコネクタで結合します。 両方のコネクタの始点を最初の四角形の結合点 1 に接続し、終点を 2 番目の四角形の最初と最後の結合点にそれぞれ接続します。

Set myDocument = ActivePresentation.Slides(1)

Set s = myDocument.Shapes

Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100)

Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100)

lastsite = secondRect.ConnectionSiteCount

With s.AddConnector(msoConnectorCurve, 0, 0, 100, 100) _
        .ConnectorFormat

    .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1
    .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1

End With

With s.AddConnector(msoConnectorCurve, 0, 0, 100, 100) _
        .ConnectorFormat

    .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1
    .EndConnect ConnectedShape:=secondRect, _
        ConnectionSite:=lastsite

End With

関連項目

Shape オブジェクト

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

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