Excel) (ConnectorFormat.BeginConnect 方法

會將所指定接點的起點附加到指定的圖案上。 如果已經是連接線的起點與另一個圖形之間的連線，該連線會中斷。

如果指定連線站台已經不位於連接線的起點，這個方法會連接線的起點移動到連線的網站和調整大小及位置的連接器。

使用 EndConnect 方法可將連接線的終點附加至圖案。

語法

運算式。BeginConnect (ConnectedShape， ConnectionSite)

表達 代表 ConnectorFormat 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
ConnectedShape	必要	圖形	連接到連接線的起點上的圖案。 指定的 Shape 物件必須與連接器位於相同的 Shapes 集合中。
ConnectionSite	必要	Long	ConnectedShape所指定圖案上的連接網站。 必須是圖案的介於 1 到指定 ConnectionSiteCount 屬性所傳回的整數之間的整數。 如果您想要連接器自動尋找連接的兩個圖形之間的最短路徑，請為此引數指定任何有效的整數，然後在連接器連接至兩端的圖形之後，使用 RerouteConnections 方法。

註解

將連接線連接到某一物件上時，該連接線的大小和位置都會自動做必要的調整。

範例

本範例會在 myDocument 中新增了兩個矩形，並用弧形連接線將這兩個矩形連接起來。 請注意，RerouteConnections方法會讓您為搭配 BeginConnect和EndConnect方法使用的ConnectionSite引數提供哪些值無關。

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, 100, 100) 
with c.ConnectorFormat 
 .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1 
 .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1 
 c.RerouteConnections 
End With

支援和意見反應

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