Excel文件的A列中列出了一系列的文件名,要想实现查找该文件是否在该文件夹及子文件夹下是否存在,如果存在则在对应B列中显示“打开文件”的链接,否则B列为空,通过VBA或函数如何实现,请教各位高手,先表感谢!
简单的做法是用Hyperlink函数引用“路径”&A列文件名,批量生成超链接。
点击后无法打开文件,则该路径无此文件。
用VBA的话,代码稍等。追问
bFile = Dir(fname) <> ""
End Function
点击后无法打开文件,则该路径无此文件。
用VBA的话,代码稍等。追问
在线等待你的vba代码,尽量详细些,本人菜鸟,谢谢
追答忙于别的事情,今天可能来不及上代码了。
明天第一时间发上来,不好意思了
继续等待你的代码,谢谢!
追答有事耽搁了。
先用代码插入一个判断文件是否存在的自定义函数,返回结果为True或False
Function bFile(fname As String)bFile = Dir(fname) <> ""
End Function
然后在工作表中写入函数,文件若存在,生成超链接;文件若不存在,单元格显示空白。
=IF(bFile("D:\test\"&A1),HYPERLINK("D:\test\"&A1),"")
温馨提示:答案为网友推荐,仅供参考