在Excel中创建指向同一工作表中具有相同索引的另一个选项卡的超链接

excel工作表中有三个选项卡，分别名为MAIN、SUB1和SUB2

SUB1包含一个TC列，其值为TC1、TC2、…TC30

而SUB2包含一个TC列，其值为TC31、TC32、…TC90

主选项卡包含一个值为TC1的TC列。。。TC90

---

*我需要一个通用公式，这样，如果用户单击TC1（SUB1的TC列），一个超链接应该将它带到MAIN的TC列中的TC1（反之亦然）。

试试这段代码。您需要将其放入

此工作簿

模块：

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
    Dim wsTarget As Worksheet
    If Left(Target, 2) <> "TC" Then Exit Sub

    On Error GoTo ErrorHandler1
    If UCase(Left(Sh.Name, 3)) = "SUB" Then
        Set wsTarget = Sheets("Main")
    Else
        Set wsTarget = Sheets("SUB" & _
            IIf(CInt(Mid(Target.Value, 3)) <= 30, 1, 2))
    End If
    wsTarget.Activate
    On Error GoTo ErrorHandler2

    wsTarget.Cells.Find(Target.Value, wsTarget.Range("A1")).Activate
    Exit Sub

ErrorHandler1:
    MsgBox "Cannot identify target sheet from " & Target
    Exit Sub
ErrorHandler2:
    MsgBox "Cannot find " & Target & " in sheet " & wsTarget.Name
End Sub

Private子工作簿\u双击前的工作表（ByVal Sh作为对象，ByVal Target作为范围，Cancel作为布尔值）
将目标设置为工作表
如果左侧（目标，2）“TC”，则退出Sub
关于错误转到ErrorHandler1
如果UCase（左（Sh.Name，3））=“SUB”，则
Set wsTarget=图纸（“主”）
其他的
设置wsTarget=图纸（“子”和_
IIf（CInt（中等（目标值，3））