excel中插入很多个超链接

Question

我一个文件一张总表
另外400多个excel文件都是单个的文件
总表怎么自动设置能把400多个超链接实现？我难道要一个个去连接？

Answer 1

你的总表和另外400个Excel文件都在同一个文件夹下吧，在总表内新建一个工作表（如Sheet2），右击Sheet2的工作表标签——查看代码——在打开的代码编辑窗口中输入以下代码：
Sub Test()
Dim i As Integer
Dim strPath As String
strPath = ThisWorkbook.Path
With Application.FileSearch
.LookIn = strPath
.SearchSubFolders = True
.Filename = "*.xls"
If .Execute > 0 Then
For i = 1 To .FoundFiles.Count
Range("A" & i) = .FoundFiles(i)
Next i
End If
End With
End Sub
关闭代码编辑窗口，在Excel窗口中的工具菜单中（2003版）单击宏——宏——执行Sheet2.test。在Sheet2的窗口中A列会出现总表文件夹下的所有.xls文件名。在B1输入
=HYPERLINK(A1,"查看文件")
公式向下填充，看看效果了！追问

我先试试

Answer 2

首先要做个文件名的列表，即使没有工具也可以用DOS的tree命令
然后在Excel中用HYPERLINK函数制作链接

Answer 3

有没有什么规律？
譬如总表里的都是单个文件的文件名？
会vba吗？追问

有规律，比如400个文件都是001 002一直到400
总表里面也一样001————400一列下去（能自己找相同名字的实现连接？）

Answer 4

恩,只能手动
因为Excel不知道你需要链接哪些文件,而这些文件又要链接到哪个单元格

Answer 5

不知道你是一个文件还是文件夹