ConnectorFormat.BeginConnectedShape 属性 (Excel)

返回一个 Shape 对象,该对象代表指定连接符的起点所连到的形状。 只读。

语法

表达式BeginConnectedShape

表达 一个代表 ConnectorFormat 对象的变量。

备注

如果指定连接符的始端未连接到形状,该属性会产生错误。

示例

此示例假定 myDocument 已包含由名为 Conn1To2 的连接符附加的两个形状。 本示例的代码将向 myDocument 添加一个矩形和一个连接符。 新连接符起点的连接位置与原来名为 Conn1To2 的连接符起点的连接位置相同,而新连接符的终点会连接到新矩形的第一个连接位置上。

Set myDocument = Worksheets(1) 
With myDocument.Shapes 
 Set r3 = .AddShape(msoShapeRectangle, 450, 190, 200, 100) 
 .AddConnector(msoConnectorCurve, 0, 0, 10, 10).Name = _ 
 "Conn1To3" 
 With .Item("Conn1To2").ConnectorFormat 
 beginConnSite1 = .BeginConnectionSite 
 Set beginConnShape1 = .BeginConnectedShape 
 End With 
 With .Item("Conn1To3").ConnectorFormat 
 .BeginConnect beginConnShape1, beginConnSite1 
 .EndConnect r3, 1 
 End With 
End With

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。