Excel 中不同工作表的超链接下拉列表答案

【问题标题】：Drop-down list of hyperlinks to different sheets in ExcelExcel 中不同工作表的超链接下拉列表
【发布时间】：2020-10-01 14:27:38
【问题描述】：

我有 5 张不同的工作表：S1、S2、S3、S4、S5。还有一个“信息”表，其中我有整体信息，在每一行中我想要一个下拉列表以及指向其中一张表（S1、S2、S3、S4、S5）的直接链接。我尝试将 Indirect 函数与 Address 一起使用，但它不是动态的。有没有办法制作一个下拉列表，其中包含直接内置的工作表的超链接？

我希望我能描述一下我的情况。

【问题讨论】：

标签： excel vba excel-formula hyperlink worksheet

【解决方案1】：

无需重新发明轮子。这已经内置在 Excel 中。右键单击左下角的工作表导航箭头，将弹出工作表列表。单击要转到的工作表。隐藏的工作表（如我屏幕截图中的 Sheet3）将不会被列出。

【讨论】：

【解决方案2】：

在单元格中放置一个下拉菜单，例如 A5。

在B5中输入：

=HYPERLINK("#" & A5 & "!A1",A5)

这将创建一个“热”超链接，指向您在下拉列表中选择的工作表的单元格 A1：

编辑#1：

将下拉列表放在 A 列中。每个下拉菜单都可以选择任何工作表。然后在工作表代码区输入：

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim A As Range, sht As String, sh As Worksheet

    Set A = Range("A:A")
    If Intersect(Target, A) Is Nothing Then Exit Sub

    sht = Target.Value
    For Each sh In Sheets
        If sh.Name = sht Then
            sh.Activate
        End If
    Next sh
End Sub

每当您更改列 A 中的值时，代码都会检查新值是否为有效的工作表名称。如果是，则代码跳转到该工作表。如果它不是一个有效的名称，则不会发生任何不好的事情。

这种方法的优点是，如果您添加/删除工作表，则无需更改代码。

因为是工作表代码，所以安装非常容易，自动使用：

右键单击 Excel 窗口底部附近的选项卡名称
选择查看代码 - 这将打开一个 VBE 窗口
粘贴内容并关闭 VBE 窗口

如果您有任何疑虑，请先在试用工作表上进行尝试。

如果您保存工作簿，宏将与它一起保存。如果您使用的是 2003 年以后的 Excel 版本，则必须保存文件为 .xlsm 而不是 .xlsx

要删除宏：

如上所示打开 VBE 窗口
清除代码
关闭 VBE 窗口

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

要了解有关事件宏（工作表代码）的更多信息，请参阅：

http://www.mvps.org/dmcritchie/excel/event.htm

必须启用宏才能正常工作！

【讨论】：

这我知道.. 我的问题是如何将这两列合并为一列？例如：在从下拉列表中选择 S2 后的“A5 单元格”中，我应该能够单击“A5 单元格”中的相同 S2，并且应该转到 S2 表。希望你能理解我的问题。
@SpandanRout 我想到了一种方法来用 VBA 完成你的“单细胞”目标............还有兴趣吗？？
绝对感兴趣！！会有很大帮助。谢谢！！
@SpandanRout 查看我的EDIT#1