自动生成Excel Formula Delineation及公式引用位置流程图方法咨询

原生内置功能（无需额外配置） #

• 公式审核面板：选中目标单元格后，在「公式」选项卡打开「公式审核」组，点击「追踪引用单元格」「追踪从属单元格」，Excel会自动生成箭头标注公式的输入来源，跨工作表、跨工作簿的引用也会明确标注来源位置。
• 批量导出公式：按下快捷键`Ctrl+``启用全局公式显示模式，全表复制所有公式到新工作表后，可以批量梳理引用路径。

VBA批量生成结构化映射关系 #

如果需要生成你示例中的文本格式依赖说明，可以运行以下VBA脚本，自动遍历工作簿内所有公式，提取对应依赖来源：

Sub 提取公式依赖映射()
    Dim ws As Worksheet, cell As Range, ref As Range
    Dim 输出表 As Worksheet, 下一行 As Long
    Set 输出表 = ThisWorkbook.Sheets.Add(After:=Sheets(Sheets.Count))
    输出表.Name = "公式依赖映射"
    输出表.Range("A1:C1") = Array("目标位置", "公式内容", "依赖来源")
    
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> 输出表.Name Then
            For Each cell In ws.UsedRange
                If cell.HasFormula Then
                    Dim 依赖列表 As String
                    依赖列表 = ""
                    On Error Resume Next
                    For Each ref In cell.Precedents
                        依赖列表 = 依赖列表 & ref.Value & " (from " & ref.Parent.Name & "!" & ref.Address & "), "
                    Next
                    On Error GoTo 0
                    
                    下一行 = 输出表.Cells(Rows.Count, 1).End(xlUp).Row + 1
                    输出表.Cells(下一行, 1) = ws.Name & "!" & cell.Address
                    输出表.Cells(下一行, 2) = cell.Formula
                    If 依赖列表 <> "" Then 输出表.Cells(下一行, 3) = Left(依赖列表, Len(依赖列表) - 2)
                End If
            Next
        End If
    Next
    输出表.Columns("A:C").AutoFit
End Sub

运行脚本后会生成独立的「公式依赖映射」工作表，你可以直接基于输出内容调整为你需要的格式。

流程图生成 #

拿到结构化的依赖映射表后，可以直接用Excel自带的SmartArt功能，按层级导入映射数据即可生成带来源标注的流程图。

内容的提问来源于stack exchange，提问作者Alek Chen