ConnectorFormat.EndConnectedShape-Eigenschaft (PowerPoint)

Artikel
04/07/2023

Gibt ein Shape -Objekt zurück, das die Form darstellt, an die das Ende der angegebenen Verbindung angefügt ist. Schreibgeschützt.

Syntax

Ausdruck. EndConnectedShape

Ausdruck Eine Variable, die ein ConnectorFormat-Objekt darstellt.

Rückgabewert

Form

Bemerkungen

Wenn das Ende der angegebenen Verbindung nicht an eine Form angefügt ist, generiert diese Eigenschaft einen Fehler.

Beispiel

In diesem Beispiel wird davon ausgegangen, dass die erste Folie in der aktiven Präsentation bereits zwei Formen enthält, die durch einen Verbinder namens "Conn1To2" angefügt sind. Der Code fügt der ersten Folie ein Rechteck und einen Verbinder hinzu. Das Ende des neuen Connectors wird an den gleichen Verbindungsstandort wie das Ende des Connectors namens "Conn1To2" angefügt, und der Anfang des neuen Connectors wird an den ersten Verbindungsstandort im neuen Rechteck angefügt.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes
    Set r3 = .AddShape(msoShapeRectangle, 100, 420, 200, 100)
    .AddConnector(msoConnectorCurve, 0, 0, 10, 10) _
        .Name = "Conn1To3"

    With .Item("Conn1To2").ConnectorFormat
        endConnSite1 = .EndConnectionSite
        Set endConnShape1 = .EndConnectedShape
    End With

    With .Item("Conn1To3").ConnectorFormat
        .BeginConnect r3, 1
        .EndConnect endConnShape1, endConnSite1
    End With

End With

Siehe auch

ConnectorFormat-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über