Excel 使用选项卡名称作为特定单元格中的变量跳转到选项卡

我正在研究一个预测模型。带有三个选项的下拉列表将这些数字中的一个放在特定的单元格1a、1b、1c中（这对应于相应命名为1a、1b、1c的选项卡）

我想单击一个框并跳转到特定单元格中名为的选项卡

我需要将工作表名称设置为单元格中包含的变量，以便根据特定单元格中出现的名称1a、1b、1c从同一位置跳转到三个不同的选项卡。

仅公式解决方案 你可以使用一个公式。例如，如果在单元格A1中有图纸名称

Sheet2

，并在某处写入以下公式：

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

然后此链接将打开

Sheet2

。如果A1中的值随后更改为

Sheet3

，则链接将自动更改为打开

Sheet3

使用控件激活另一个工作表

• 如果要创建按钮，请将以下代码复制到标准模块，例如

  模块1

  ，并将

  跳转

  分配到按钮（

  右键单击>分配宏

  ）

按钮

Option Explicit

Sub jump()
    Const wsName As String = "Sheet1"
    Const cAddr As String = "A1"
    With ThisWorkbook
        .Worksheets(.Worksheets(wsName).Range(cAddr).Value).Activate
    End With
End Sub

Option Explicit

Private Sub CommandButton1_Click()
    Const cAddr As String = "A1"
    ThisWorkbook.Worksheets(Range(cAddr).Value).Activate
End Sub

• 如果要创建命令按钮，请将以下代码复制到相应的图纸模块，例如

  Sheet1

  （

  Design Mode>双击

  ）

命令按钮

Option Explicit

Sub jump()
    Const wsName As String = "Sheet1"
    Const cAddr As String = "A1"
    With ThisWorkbook
        .Worksheets(.Worksheets(wsName).Range(cAddr).Value).Activate
    End With
End Sub

Option Explicit

Private Sub CommandButton1_Click()
    Const cAddr As String = "A1"
    ThisWorkbook.Worksheets(Range(cAddr).Value).Activate
End Sub

• 适当地更改常量

---

单击方框是什么意思？你是说一个按钮吗？子链接_1a（）'===============================================================屏幕更新应用程序.ScreenUpdate=False'==========================================================================================作为字符串的标准表格=表格（“地图”）.范围（“B7”）表格（标准表格）。激活“===============================================================================================================================================================================================================结束子子子链接_1a（）Dim标准表作为字符串标准表=工作表（“映射”）。范围（“B7”）工作表（标准表）。激活结束Sub@SyllyOBrien请不要在评论中发布代码。没用！如果这是你有问题的话，那么这应该是你原来帖子的一部分。你可以编辑它，把它添加到那里，然后问一些问题。如果这被认为是一个解决方案，则使用anwser按钮发布答案您可能想查看或。