fso提取汇总文件夹及其下的文件名及内容（递归操作字典汇总）

liulang0808

SHY845613 发表于 2023-7-13 15:06
老师可以帮我看一下吗，我里面就弄了两个文件夹帮我试下可以吗，我这边是有几十个上面个文件和子文件夹的， ...

看不明白。。。。。

SHY845613

liulang0808 发表于 2023-7-14 07:17
看不明白。。。。。

老师我没有说清楚，我就是想在很多的文件夹和子文件夹下找到以合同号为依据的，找到指定的内容到出库单里面，一个合同号一个出库单，都是在一个工作簿里面，合同号是我自己输入的，想输入合同号后，就找到指定的内容到这个出库单里

风雨声点滴

aoe1981 发表于 2014-12-11 15:30
有个问题：
“ByVal 可选的。表示该参数按值传递。
ByRef 可选的。表示该参数按地址传递。ByRef 是 Vi ...

测试了一下  按地址传递也没有问题   因为你已经把要用的参数d定为公共变量了。

lswm_1980

做个记号，日后学习

weilaikeqiak

学习了,谢谢楼主

cai2532

这个遍历当前文件夹及子文件夹很实用。

时光如水00

liulang0808 发表于 2014-11-15 09:11
三、遍历当前文件夹所有子文件夹
使用了递归。。。。
Sub 按钮1_Click()

关于递归，大神可否详细写下注释。。。。。。递归看不懂啊。例如 Cells(Rows.Count, 1).End(3).Offset(1) = pth这行意义是什么。F8调试 pth好像看不到。

xun_1221

如果不同文件夹里头的文件名称是一样的，如何汇总呢？

liulang0808

xun_1221 发表于 2024-7-5 10:17
如果不同文件夹里头的文件名称是一样的，如何汇总呢？

关键是看你要按照什么逻辑汇总了

xun_1221

liulang0808 发表于 2024-7-5 12:29
关键是看你要按照什么逻辑汇总了

就是不同文件夹里头的文件名称一样，但是汇总到一起的时候，这些文件名称一样的，自动在文件名称后面加上序号，确保全部的文件都汇总在一起。