Shape.ConnectorFormat-Eigenschaft (Publisher)

Gibt ein ConnectorFormat -Objekt für die Verbindung Formateigenschaften enthält. Gilt für Shape- oder ShapeRange -Objekte, die Connectors darstellen. Schreibgeschützt.

Syntax

Ausdruck. ConnectorFormat

Ausdruck Eine Variable, die ein Shape-Objekt darstellt.

Beispiel

In dem folgenden Beispiel werden zwei Rechtecke zur ersten Seite der aktiven Publikation hinzugefügt und durch eine gekrümmte Verbindung miteinander verbunden.

Dim shpRect1 As Shape 
Dim shpRect2 As Shape 
 
With ActiveDocument.Pages(1).Shapes 
 
 ' Add two new rectangles. 
 Set shpRect1 = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=100, Top:=50, Width:=200, Height:=100) 
 Set shpRect2 = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=300, Top:=300, Width:=200, Height:=100) 
 
 ' Add a new curved connector. 
 With .AddConnector(Type:=msoConnectorCurve, _ 
 BeginX:=0, BeginY:=0, EndX:=100, EndY:=100) _ 
 .ConnectorFormat 
 
 ' Connect the new connector to the two rectangles. 
 .BeginConnect ConnectedShape:=shpRect1, ConnectionSite:=1 
 .EndConnect ConnectedShape:=shpRect2, ConnectionSite:=1 
 
 ' Reroute the connector to create the shortest path. 
 .Parent.RerouteConnections 
 End With 
 
End With 

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.