0
有没有办法在这个方法?:选择“销”连接到另一个连接器的引脚
Application.ActiveWindow.Page.Shapes.ItemFromID(1).AutoConnect
我想连接两个形状,然后我想连接第三个到创建的连接,但不是在开始时,我需要将它连接到第四个引脚。这是我有:
这是我想拥有的一切:
任何想法?
有没有办法在这个方法?:选择“销”连接到另一个连接器的引脚
Application.ActiveWindow.Page.Shapes.ItemFromID(1).AutoConnect
我想连接两个形状,然后我想连接第三个到创建的连接,但不是在开始时,我需要将它连接到第四个引脚。这是我有:
这是我想拥有的一切:
任何想法?
要获得形状的中心,我们必须使用这条线。
Set object = AppVisio.ActiveWindow.Page.Shapes.ItemFromID(objectId)
connectingXfrom = object .CellsU("PinX").Result("in")
connectingYfrom = object .CellsU("PinY").Result("in")
形状的中心对象是在点C [connectingXfrom,connectingYfrom]
接下来两行移动连接器到P点的第一个点[connectingXfrom,connectingYfrom]
Application.ActiveWindow.Page.Shapes.ItemFromID(connectorShapeId).CellsSRC(1, 4, 0).FormulaU = connectingXfrom
Application.ActiveWindow.Page.Shapes.ItemFromID(connectorShapeId).CellsSRC(1, 4, 1).FormulaU = connectingYfrom
如果我们要开始连接连接1但接近对象2,我们需要做的:
connectingXfrom = connectingXfrom - someDistanceValue