请问 vba里 有没有函数 能获取某个目录下所有的文件名 ,十分感谢
如题,vba里 有没有函数 能获取某个目录下所有的文件名。
[解决办法]
Private Sub Form_Load()
'引用Microsoft script runtime
Dim f As File, fd As Folder
Set fd = fso.GetFolder( "c:\ ")
For Each f In fd.Files
Debug.Print f.Path
Next
End Sub
[解决办法]
同楼上
[解决办法]
dir + 循环也可以。
[解决办法]
在VBA中引用Microsoft Scripting Runtime
打开对象浏览器,选择Scripting库,这里面有对磁盘文件系统的所有操作类,具体用法请看MSDN帮助
[解决办法]
用fso对象或dir
配合递归
就可以遍历一棵树
[解决办法]
打开文件用
Set objExcel = CreateObject( "Excel.Application ")
Set objWorkbook = objExcel.Workbooks.Open( "d:\example.xls ")
关闭时用
objWorkbook.Close SaveChanges:=False
objExcel.Quit
就可以不现实而在后台运行了。