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