文件夹目录.xls

将【文件夹目录.xls】考入到要提取文件名的文件夹中，如：d:\我的文档\桌面\收藏夹，让宏能运行，
=IF(ROW(1:1)>COLUMNS(myFiles),"",HYPERLINK(myPath&INDEX(myFiles,ROW(1:1)),INDEX(myFiles,ROW(1:1))))
复制带公式的单元格文本粘贴到WORD然后在复制粘贴到EXCEL以此去掉公式保留链接