求助excel大神,excel表中如何批量超链接,和批量新建表

因为要做100个员工的培训资料,我需要超链接,对应表,最好是批量超链接,一个个太费时间了,还有我需要批量新建表格,100多个人太费时间了,求助大神了!

1.宏3.0取出各工作表的名称,方法:
ctrl+f3出现自定义名称对话框,取名为X,引用位置栏输入:
=MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,100)
确定
2.HYPERLINK函数批量插入连接,方法:
插入目录表格(一般为第一个sheet)
在A2单元输入公式=HYPERLINK("#'"&INDEX(X,ROW())&"'!A1",INDEX(X,ROW()))
A2单元向下填充,直到出错为止,目录就生成了。
注:=HYPERLINK("#'"&INDEX(X,ROW())&"'!A1",INDEX(X,ROW()))
这个公式中,从左到右的引号顺序是,双-单-双-双-单-双,要特别注意。
温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-08-09
在C3中输入或复制粘贴下列公式
=HYPERLINK("#"&A3&"!A1",A1)
公式中的两个A1,根据需要进行调整为其他单元格。
下拉填充本回答被提问者采纳
第2个回答  2019-08-09
1、把光标放在第一个工作表希望插入目录的地方;

2、键入Alt+F11打开VBA编辑器,然后选择菜单“插入 - 模块”;

3、在代码编辑区粘贴如下代码:

Option Explicit

Sub AutoGenerateHyperlinks()

Dim nIndex As Integer
Dim oRange As Range

For nIndex = 2 To Sheets.Count
Set oRange = Cells(Selection.Row + nIndex - 2, Selection.Column)
oRange.Hyperlinks.Add
Anchor:=oRange, Address:="", SubAddress:=Sheets(nIndex).Name &
"!A1", TextToDisplay:=Sheets(nIndex).Name
Next

End Sub

4、键入F5运行,再键入Alt+F11切换回第一个工作表,检查目录超链是否自动建立成功。本回答被网友采纳
相似回答