在 Excel 中查找工作表名称映射

Question

我继承了一个 Excel 工作簿，其中包含多个工作 sheet，所有工作都带有命名选项卡。我有一些 VBA 代码根据按钮和输入运行。当我比较 VBA 项目和 Excel 对象列表时，sheet 的名称与选项卡匹配。目前一切顺利。

但是，在 VBA 代码和传播sheet 本身中，它引用了其他作品sheet。它们仍然是工作簿的一部分，我认为代码已创建，然后选项卡已重命名。但是我不知道 Excel 是如何保持连接的，或者更重要的是，我应该如何弄清楚这些连接。

因此，例如，我有一个引用 MiscDataRange

的 VLOOKUP

=IF((VLOOKUP(E4,MiscDataRange,4,0))="Y"...

我不知道 MiscDataRange 是什么，但在 VBA 代码中我找到了一个参考。在指定 worksheet "Misc Interrupt" 之后，它不是任何命名的选项卡。

    Worksheets("Misc Interrupt").Range("H2:H47") = "N" 'Reset to N at noon.

    UpdateData

    Range("MiscDataRange").ClearContents

我确实有一个名为 MiscInt 的 sheet，它似乎是 "Misc Interrupt" 使用的 sheet 并且 MiscDataRange 正在引用。

我的问题是我的知识有漏洞 - 我可以猜测 MiscInt 和 Misc Interrupt 是同一个工作sheet，VLookup 指的是 MiscInt sheet 上的数据。但我只能猜测。我在文件中找不到任何将这两个映射为相同的文件。我在哪里可以找到它？

这个问题似乎相关，除了他只是有一个 VLookup，并且没有查看 VBA 代码：Non-existent Excel Worksheet, but Formulas and Defined names still work?。另外，从VBA代码中，可以看出隐藏和可见的worksheets.

Answer 1

如果我理解你的问题，你正在寻找那些命名范围的位置。

你可以像这样使用子：

Sub t()
Debug.Print "Sheet: " & Range("testNamedRange").Parent.Name
Debug.Print "Full Location: " & Range("testnamedrange").Name
Debug.Print "File path: " & Range("testnamedrange").Worksheet.Parent.Path
End Sub

有帮助吗？

Answer 2

您可以打开名称管理器，方法是转到公式选项卡并单击 名称管理器 或按 ctrl+ F3 或者您可以通过按 F3 粘贴名称列表和名称引用的内容。可能需要先取消隐藏名称。

Sub ShowAllNames()
    Dim n As Name
    For Each n In ThisWorkbook.Names
        n.Visible = True
    Next
End Sub

在 Excel 中查找工作表名称映射

Find worksheet name mapping in Excel

excel

vba

excel-2016