vba怎么获取文件夹名称

要获取文件夹名称，可以使用VBA中的FileSystemObject对象的GetFolder方法。

下面是一个简单的示例代码：

Sub GetFolderName()     Dim FSO As Object     Dim FolderPath As String     Dim FolderName As String          ' 设置文件夹路径     FolderPath = "C:\Path\To\Folder"          ' 创建FileSystemObject对象     Set FSO = CreateObject("Scripting.FileSystemObject")          ' 获取文件夹对象     Dim Folder As Object     Set Folder = FSO.GetFolder(FolderPath)          ' 获取文件夹名称     FolderName = Folder.Name          ' 显示文件夹名称     MsgBox "文件夹名称为：" & FolderName End Sub 

在代码中，首先将要获取的文件夹路径设置为FolderPath变量。然后，创建一个FileSystemObject对象并使用GetFolder方法获取文件夹对象。最后，通过Folder.Name属性获取文件夹名称，并显示在消息框中。

请根据自己的实际需求修改文件夹路径。