VBA调用外部对象02:FileSystemObject
![作者头像](https://ask.qcloudimg.com/http-save/yehe-7388849/zcexeqvrjg.jpeg)
FileSystemObject与字典Dictionary都是工具-应用中Microsoft Scripting Runtime的对象,从名字能够看出,这个对象就是用来操作文件的。
和VBA自带的VBA库下FileSystem相比,FileSystemObject这个外部对象封装的功能更多,用起来也更为方便。
几乎前面提到的关于文件的操作这个对象都有:
![](https://ask.qcloudimg.com/http-save/yehe-7388849/uw8hl8pgoa.png)
Scripting对象库中还有File、Folder、TextStream等对象,这几个都是可以使用FileSystemObject的一些方法来创建的。
将这些单独做成一个对象的目的主要也是为了使用上的方便,在VBA里对文件的相关操作使用FileSystemObject对象是非常的方便的。
比如查找遍历文件:
Sub GetFilesFSO()
Dim fso As Object
Dim file As Object
Dim folder As Object
Set fso = CreateObject("Scripting.FileSystemObject")
'根据路径获取文件夹对象
Set folder = fso.GetFolder(ThisWorkbook.path)
'遍历文件
For Each file In folder.Files
Debug.Print file.path
Next file