0

有没有办法在这种方法中选择“pin”?:

Application.ActiveWindow.Page.Shapes.ItemFromID(1).AutoConnect

我想连接两个形状,然后我想将第三个连接到创建的连接上,但不是一开始,我需要将它连接到第四个引脚。这就是我所拥有的: 这就是我想要拥有的: 在此处输入图像描述
在此处输入图像描述

任何想法?

4

1 回答 1

0

为了获得形状中心,我们必须使用这条线。

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
  • someDistanceValue 例如可以是 1.5
  • objectId 是对象 2 形状的 ID
  • connectorShapeId 是连接 2 形状的 ID。
于 2015-12-04T09:06:15.663 回答