Range("A" & i) = .FoundFiles(i)语句后加入语句Range("B" & i).Formula = "=HYPERLINK(A" & i & ",A" & i & ")"
可以,谢谢!谢谢!
你直接把文件夹加入超链接多省省劲呀
你采纳我，我就帮你打广告。。。。
