如何在vba中用dir函数遍历文件夹和文件 - VBA - ExcelOffice

如何在vba中用dir函数遍历文件夹和文件





如何在vba中使用FileSystemObject对象操作文件和文件夹? 一文中介绍了在vba中使用FileSystemObject对象遍历指定路径下的所有文件的方法。

本文介绍在vba中使用内置的dir函数遍历指定路径下的所有文件的方法。

dir函数的语法如下:

它将根据pathname参数提供的路径和attributes参数提供的属性查找满足条件的文件。

当第一次调用dir函数时,需要提供pathname参数,如果找到了满足条件的文件,则返回文件名。

如果要继续查找下一个满足条件的文件,再次调用dir函数时,不需要提供pathname参数和attributes参数。

循环调用,直到返回的值为空时,表示没有再满足条件的文件存在。

根据以上的分析,可以使用如下的代码遍历指定路径下的所有文件:

根据attributes参数可以修改以上代码为遍历指定路径下的所有文件和文件夹,还可以包含隐藏文件等。

如将

修改为

即可实现遍历指定路径下的所有文件和文件夹。

通过以上的代码可以遍历指定路径下一级的所有文件和文件夹,但是不能遍历子文件夹内的文件。

如果要遍历文件夹及其子文件中的文件,可以参考如何用vba遍历所有文件夹及其子文件夹?一文。

 

打赏

发表评论