关于Excel中批量创建链接

来源：百度知道 编辑：UC知道 时间：2024/06/25 16:53:48
如何将一个多级目录图片文件夹中在Excel中创建一个列表，其中将每张图片都做成一个链接，使得单击路径可以直接打开图片。由于目录中的子目录和图片很多，而且目录名称和图片文件名都无序的，因此想请教高手能否在Excel中批量添加直接打开图片的链接。以下图为例。

按你的图示:
D1输入公式
=HYPERLINK(A1&B1&C1)

然后,D1公式向下复制

如果目录和图片名称都在第3列里：
Sub Macro1()
Dim i, j As Integer
j = Sheets(1).Range("C65536").End(xlUp).Row
For i = 1 To j
Cells(i, 3).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Cells(i, 3).Value, TextToDisplay:=Cells(i, 3).Value
Next
End Sub
目录和路径如果分开的就要进行单元格字符串拼接

录制宏，稍作修改，加个循环。

做个标记 同学习