仅遍历子文件夹，超链接文件所在位置而非文件，罗列属性

伯风♂

大哥大姐们好，
因为工作需要想用VBA在Excel里实现2个功能，因为我接触VBA才一周，所以想请大神写2个功能的代码。
1、仅遍历子文件夹下所有文件，然后列出文件名、文件位置、创建日期、文件大小。最好可以过滤文件类型，和选择母文件夹。     
     我要在原文件和备份间做所有文件（大约有1500个文件）的比对。
2、仅遍历子文件夹下所有文件，根据单元格值模糊搜索pdf文件，并将pdf文件位置链接到单元格。
     实现的效果是：点击单元格打开所在文件夹并定位文件。

详细要求写在相应的xlsm里了，我研究了5天代码总出错，所以请各位出手帮忙。万分感谢！

伯风♂

朱荣兴 发表于 2018-10-9 12:46
这:问题不简单先留个足Ep。

如果很麻烦，可以去掉一些要求
1里，遍历当前文件夹和子文件夹下所有文件，不需要过滤文件类型，也不需要选中母文件夹。
2里，遍历当前文件夹和子文件夹下所有文件。

我找到很多案例，可以列出文件名、文件位置、创建日期。但是代码合并我不会，因为看不懂。
案例里模糊搜索也能完成，但是链接的直接是PDF文件，点击超链接就是打开PDF文件了。我要定位到文件后方便我接下来自由选择打开还是复制文件或发送文件。

我不是很懂，想着应该不是很难吧，难为版主了。

macin

溜个足迹，哈哈哈

chis3

要知道size等好像要用fso
第二個應該不難,只是hyperlink放置地址

伯风♂

chis3 发表于 2018-10-9 19:52
要知道size等好像要用fso
第二個應該不難,只是hyperlink放置地址

这些个都是我找到的案例。但是
附件A的VBA里没找到文件类型过滤、
         它有我不需要的文件夹信息，我只需要文件的创建时间、
         我希望的文件夹地址是相对于xlsm的地址：“xlsm位置\”产品PDF图纸1\文档\“文件.pdf”，“”内的内容不要写到单元格里。
附件B的单元格里有公式、
         文件大小的单位不是我需要的KB。
附件C的VBA里没找到文件类型过滤、
         而且创建了文件的超链接，而我需要点击单元格打开文件后定位和选中为文件。

希望这些个案例可以帮到你。

cjc209

这种问题用Power Query 才好解决

cjc209

Power Query 可以找到文件名 文件 各种属性 以及路径等等 瞬间完成

伯风♂

cjc209 发表于 2018-10-10 09:57
Power Query 可以找到文件名 文件 各种属性 以及路径等等 瞬间完成

我的是Excel2016，Power Query内置在数据这项下。
请告知如何操作才能比对原文件和备份件的属性。

伯风♂

伯风♂ 发表于 2018-10-10 10:49
我的是Excel2016，Power Query内置在数据这项下。
请告知如何操作才能比对原文件和备份件的属性。

1442个数据已经加载，但是没有文件大小。

顺便安利这个截图软件https://zh.snipaste.com