要在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窗口中输出文件夹内的文件名。