Excel表格如何进行批量超链接？有那位大侠给指导一下谢谢了

2025年03月19日 12:59

有4个网友回答

网友（1）：

我也来贡献一种函数公式的超链接方法（包括名称应用），好处是工作表很多时，在总表中自动构建工作表名称目录并提供链接，而不用手工录入工作表名称：
第一步：在公式=》名称管理器中编辑定义以下三个名称
ShtN=SMALL(IF((ROW(INDIRECT("1:"&COLUMNS(ShtNames)))<>GET.DOCUMENT(87)),ROW(INDIRECT("1:"&COLUMNS(ShtNames)))),ROW(INDIRECT("1:"&(COLUMNS(ShtNames)-1))))

ShtNames=SUBSTITUTE(GET.WORKBOOK(1),"["&GET.DOCUMENT(88)&"]","")&T(NOW())

Shts=LOOKUP(ShtN,ROW(INDIRECT("1:"&COLUMNS(ShtNames))),TRANSPOSE(ShtNames))

第二步：在总表中的A2单元格录入公式，并下拉，则总表自动出现各工作表名称，且点击总表中的工作表名称自动跳到各工作表的B1单元格。
总表A2单元格公式：=IF(ROW(1:1)>ROWS(Shts),"",HYPERLINK("#"&"'"&INDEX(Shts,ROW(1:1))&"'"&"!B1",INDEX(Shts,ROW(1:1))))

网友（2）：

假设用户名在A列，各用户的工作表名为用户名。
B列公式 =HYPERLINK("#"&A1&"!A1",A1) 下拉。

网友（3）：

我觉得做不到
留个记号先，看有没有大神~

网友（4）：

; 首先将每户的工作表名设定为用户的姓名

; 在第一个工作表写入下面代码

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim nm As String
    nm = Target.Value
    Sheets(nm).Select
End Sub

; 在第一个工作表双击姓名就会直接进入用户工作表