ConnectorFormat-Objekt (Excel)

Enthält Eigenschaften und Methoden, die für Verbindungen gelten.

HinwBemerkungeneise

Eine Verbindung ist eine Linie, die zwei andere Formen mit als "Verbindungsseiten" bezeichneten Punkten zusammenfügt. Wenn Sie verbundene Formen neu anordnen, wird die Geometrie der Verbindung automatisch so angepasst, dass die Formen verbunden bleiben.

Verbindungspunkte werden im Allgemeinen nach den in der folgenden Tabelle aufgeführten Regeln nummeriert.

Formart Schema für die Nummerierung der Verbindungsseite
AutoFormen, WordArt, Grafiken und OLE-Objekte Die Verbindungsseiten werden von oben fortlaufend entgegen dem Uhrzeigersinn nummeriert.
Freihandformen Die Verbindungsseiten sind die Scheitelpunkte, die den Nummern der Scheitelpunkte entsprechen.

Verwenden Sie die ConnectorFormat-Eigenschaft des Shape-Objekts , um ein ConnectorFormat-Objekt zurückzugeben. Verwenden Sie die Methoden BeginConnect und EndConnect, die am Ende der Verbindung mit anderen Formen im Dokument anfügen. Verwenden Sie die RerouteConnections-Methode des Shape-Objekts , um automatisch den kürzesten Pfad zwischen den beiden Shapes zu finden, die durch den Verbinder verbunden sind. Verwenden Sie die Connector -Eigenschaft, um festzustellen, ob eine Form eine Verbindung ist.

Hinweis

Sie weisen eine Größe und eine Position zu, wenn Sie der Shapes-Auflistung einen Verbinder hinzufügen. Größe und Position werden jedoch automatisch angepasst, wenn Sie den Anfang und das Ende der Verbindung an andere Shapes in der Auflistung anfügen. Wenn Sie also beabsichtigen, einen Verbinder an andere Formen anzufügen, sind die von Ihnen angegebene Anfangsgröße und Position irrelevant.

Ebenso Sie festlegen, welche Verbindungsseiten einer Form mit der Verbindung, wenn Sie die Verbindung verbinden, aber die RerouteConnections -Methode verwenden, nachdem die Verbindung verbunden ist möglicherweise die Verbindungsseiten die Verbindung, und Ihre ursprüngliche Auswahl von Verbindungsseiten irrelevant machen ändern.

Beispiel

Um herauszufinden, welche Zahl welcher Verbindungsstelle auf einer komplexen Form entspricht, können Sie mit der Form experimentieren, während die Makroaufzeichnung eingeschaltet ist, und dann den aufgezeichneten Code untersuchen. Oder Sie können eine Form erstellen, auswählen und dann das folgende Beispiel ausführen. Dieser Code nummerieren jeden Verbindungsstandort und fügt einen Connector an ihn an.

Set mainshape = ActiveWindow.Selection.ShapeRange(1) 
With mainshape 
 bx = .Left + .Width + 50 
 by = .Top + .Height + 50 
End With 
With ActiveSheet 
 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.Characters.Text = j 
 End With 
 Next j 
End With

Im folgenden Beispiel werden myDocument zwei Rechtecke hinzugefügt und die Rechtecke durch eine gekrümmte Verbindung miteinander verbunden.

Set myDocument = Worksheets(1) 
Set s = myDocument.Shapes 
Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100) 
Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100) 
Set c = s.AddConnector(msoConnectorCurve, 0, 0, 0, 0) 
With c.ConnectorFormat 
 .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1 
 .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1 
 c.RerouteConnections 
End With

Methoden

Eigenschaften

Siehe auch

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.