检测线形的终点

Question

我在Excel工作表中有一些相当大的图表，显示输入和目标，如下所示：

此处输入i/p_1被视为标记线左侧的signal_1（红线），并且会转到目标1和2。所有文本都在单元格中输入，箭头绘制为形状。

我必须像这样创建输入，信号名称和目的地表：

我将如何实现这一目标？

我在想找出箭头的起点和终点，然后查看上面一行中的单元格会给我一个很好的起点。 但我也不知道如何做到这一点。

Answer 1

这是一个检索请求的单元格的想法。这应该是实现目标的良好起点。

Sub DisplayArrowCells()
    Dim x As Shape
    For Each x In Shapes
       If InStr(x.Name, "Elbow Connector") = 1 Then
             Debug.Print _ 
                 x.TopLeftCell.Address & "," & x.TopLeftCell.Value _
                 & " <---- " & _
                 x.BottomRightCell.Offset(-1, 0).Address & "," & x.BottomRightCell.Offset(-1, 0).Value
        End If
    Next
End Sub