ConnectorFormat.BeginConnect-Methode (PowerPoint)

Fügt den Anfang der angegebenen Verbindung an eine angegebene Form an.

Syntax

Ausdruck. BeginConnect( _ConnectedShape_, _ConnectionSite_ )

Ausdruck Eine Variable, die ein ConnectorFormat-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
ConnectedShape	Erforderlich	Shape	Die Form, der der Anfang der Verbindung zugeordnet werden soll. Das angegebene Shape -Objekt muss sich in derselben Shapes -Auflistung wie die Verbindung befinden.
ConnectionSite	Erforderlich	Long	Eine Verbindungsseite an der durch ConnectedShape angegebenen Form. Muss eine ganze Zahl zwischen 1 und der Zahl, die von der ConnectionSiteCount -Eigenschaft der angegebenen Form zurückgegeben. Wenn den Connector automatisch den kürzesten Pfad zwischen den beiden Formen suchen, die eine Verbindung hergestellt werden soll, geben Sie eine gültige ganze Zahl für dieses Argument an, und klicken Sie dann verwenden Sie die RerouteConnections -Methode, nachdem die Verbindung mit beiden Formen an beiden Enden verbunden ist.

HinwBemerkungeneise

Wenn bereits eine Verbindung zwischen den Anfang der Verbindung und eine andere Form vorhanden ist, wird diese Verbindung unterbrochen. Wenn der Anfang der Verbindung noch nicht an der angegebenen Verbindungsseite positioniert, wird diese Methode verschiebt den Anfang der Verbindung zu der Verbindungsseite und passt die Größe und Position der Verbindung. Verwenden Sie die EndConnect -Methode an um das Ende der Verbindung mit einer Form zu verbinden.

Wenn Sie eine Verbindung mit einem Objekt verbinden, werden die Größe und Position der Verbindung bei Bedarf automatisch angepasst.

Beispiel

In diesem Beispiel wird der ersten Folie der aktiven Präsentation zwei Rechtecke hinzugefügt und die Rechtecke durch eine gekrümmte Verbindung. Beachten Sie, dass die RerouteConnections -Methode es irrelevant welche Werte Sie für den Rechtecken, die mit den Methoden BeginConnect und EndConnect verwendet angeben.

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, 100, 100) _
        .ConnectorFormat
    .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1
    .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1
    .Parent.RerouteConnections
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.