共用方式為


Publisher (的 ConnectorFormat 物件)

包含套用於接點的屬性和方法。 連接線是用於連接其他兩個圖案的線,所連接的位置稱作連線節點。 如果重新排列相連的圖案,將會自動調整連接線的幾何,使得重新排列的圖案仍然保持相連。

註解

使用 圖形ConnectorFormat 屬性 或 ShapeRange 物件 若要傳回 ConnectorFormat 物件的集合。

使用 BeginConnectEndConnect 若要附加至出版物中其他圖形的連接器端點 ConnectorFormat 物件的方法。

使用 RerouteConnectionsShape 物件和自動尋找連接器所連接兩個圖形之間的最短路徑的 ShapeRange 集合的方法。

使用 Connector 屬性來判斷圖形是否為連接器。

注意事項

雖然您將連接線新增到 Shapes 集合中時,會指定其大小和位置,但是當您將連接線的起點和終點連接到集合中的其他圖案時,連接線的大小和位置都會自動調整。 因此,如果您想要將連接器附加至其他圖形,您指定的初始大小和位置就無關緊要。 同樣地,您指定哪些連線網站附加至當您附加連接器的連接器的圖形,但是使用 RerouteConnections 方法之後附加連接器可能會變更連接器將附加至,讓您所選擇的原始連線站台無關的 connection 網站。

範例

下列範例會將兩個矩形新增至使用中出版物,然後使用弧形連接器來連接它們。

Dim shpAll As Shapes 
Dim firstRect As Shape 
Dim secondRect As Shape 
 
Set shpAll = ActiveDocument.Pages(1).Shapes 
Set firstRect = shpAll.AddShape(Type:=msoShapeRectangle, _ 
 Left:=100, Top:=50, Width:=200, Height:=100) 
Set secondRect = shpAll.AddShape(Type:=msoShapeRectangle, _ 
 Left:=300, Top:=300, Width:=200, Height:=100) 

With shpAll.AddConnector(Type:=msoConnectorCurve, BeginX:=0, _ 
 BeginY:=0, EndX:=0, EndY:=0).ConnectorFormat 
 .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1 
 .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1 
 .Parent.RerouteConnections 
End With

方法

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應