ConnectorFormat オブジェクト (PowerPoint)ConnectorFormat Object (PowerPoint)

コネクタに設定されるプロパティとメソッドが含まれます。Contains properties and methods that apply to connectors.

注釈Remarks

コネクタは、結合点と呼ばれる点で 2 つの図形を接続する線です。A connector is a line that attaches two other shapes at points called connection sites. 接続された図形を再配置すると、コネクタの形は、図形が接続状態を維持するように自動的に調整されます。If you rearrange shapes that are connected, the geometry of the connector will be automatically adjusted so that the shapes remain connected.

ConnectorFormatプロパティを使用して、 ConnectorFormatオブジェクトを取得します。Use the ConnectorFormat property to return a ConnectorFormat object. 文書内の他の図形にコネクタの端を接続するのには、 BeginConnect メソッドおよび EndConnect メソッドを使用します。Use the BeginConnect and EndConnect methods to attach the ends of the connector to other shapes in the document. コネクタで接続されている 2 つの図形間の最短経路を自動的に検出するのにには、 RerouteConnections メソッドを使用します。Use the RerouteConnections method to automatically find the shortest path between the two shapes connected by the connector. 図形がコネクタであるかどうかを確認するのにには、 コネクタ のプロパティを使用します。Use the Connector property to see whether a shape is a connector.

割り当てることの大きさと位置をShapesコレクションにコネクタを追加するが、サイズと位置が自動的に調整コレクション内の他の図形を開始し、コネクタの終点を接続するときに注意してください。Note that you assign a size and a position when you add a connector to the Shapes collection, but the size and position are automatically adjusted when you attach the beginning and end of the connector to other shapes in the collection. したがって、他の図形にコネクタを接続する場合は、初期のサイズと位置を指定する、関係ありません。Therefore, if you intend to attach a connector to other shapes, the initial size and position you specify are irrelevant. 同様に、コネクタを接続するときにコネクタを接続する図形を指定するが、コネクタを接続後、 RerouteConnections メソッドを使用すると、無関係なサイトの接続の選択を行う、コネクタを接続する接続サイトが変わる可能性があります。Likewise, you specify which connection sites on a shape to attach the connector to when you attach the connector, but using the RerouteConnections method after the connector is attached may change which connection sites the connector attaches to, making your original choice of connection sites irrelevant.

通常、結合点は、次の表に示す規則に従って番号が付けられます。Connection sites are generally numbered according to the rules presented in the following table.

図形の種類Shape type 結合点番号付け規則Connection site numbering scheme
オートシェイプ、ワードアート、図、OLE オブジェクトAutoShapes, WordArt, pictures, and OLE objects 結合点は、上から反時計周りに番号が付けられます。The connection sites are numbered starting at the top and proceeding counterclockwise.
フリーフォームFreeforms 結合点は頂点で頂点番号に対応して結合点に番号が付けられます。The connection sites are the vertices, and they correspond to the vertex numbers.

Example

次の使用例は、 myDocument に 2 つの四角形を追加し、その 2 つの四角形を曲線コネクタで接続します。The following example adds two rectangles to myDocument and connects them with a curved connector.

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)

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

    .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1

    .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1

    .Parent.RerouteConnections

End With

複雑な図形での結合点の番号を調べるには、マクロ レコーダーがオンになっているときに図形を調べ、次に記録されたコードを調べるか、図形を作成し、それを選択し、次の使用例を実行します。To figure out which number corresponds to which connection site on a complex shape, you can experiment with the shape while the macro recorder is turned on and then examine the recorded code; or you can create a shape, select it, and then run the following example. このコードは、各結合点に番号を付け、それにコネクタを接続します。This code will number each connection site and attach a connector to it.

Set mainshape = ActiveWindow.Selection.ShapeRange(1)

With mainshape

    bx = .Left + .Width + 50

    by = .Top + .Height + 50

End With

With ActiveWindow.View.Slide

    For j = 1 To mainshape.ConnectionSiteCount

        With .Shapes.AddConnector(msoConnectorStraight, bx, by, bx + 50, by + 50)

            .ConnectorFormat.EndConnect mainshape, j

            .ConnectorFormat.Type = msoConnectorElbow

            .Line.ForeColor.RGB = RGB(255, 0, 0)

            l = .Left

            t = .Top

        End With

        With .Shapes.AddTextbox(msoTextOrientationHorizontal, l, t, 36, 14)

            .Fill.Visible = False

            .Line.Visible = False

            .TextFrame.TextRange.Text = j

        End With

    Next j

End With

関連項目See also

PowerPoint オブジェクト モデル リファレンスPowerPoint Object Model Reference

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.