要在VBA中获取文件夹内的文件名,您可以使用FileSystemObject对象的GetFolder方法来获取文件夹对象,然后使用Files集合来获取文件集合。 下面是一个示例代码:
Sub GetFilesInFolder() Dim fso As Object Dim folder As Object Dim file As Object ' 创建FileSystemObject对象 Set fso = CreateObject("Scripting.FileSystemObject") ' 获取指定文件夹对象 Set folder = fso.GetFolder("C:\YourFolderPath") ' 循环遍历文件集合 For Each file In folder.Files ' 输出文件名 Debug.Print file.Name Next file ' 释放对象 Set file = Nothing Set folder = Nothing Set fso = Nothing End Sub
请将代码中的"C:\YourFolderPath"替换为您要获取文件名的文件夹路径。 运行上述代码将在VBA的Immediate窗口中输出文件夹内的文件名。