【VBA】Get folder name

VBA Code

As an example, get the folder name of the folder “temp”

Option Explicit

Sub sample()
    
    Dim fso As Object
    Dim FolderPath As String
    Dim FolderName As String
    
    'Set "Folder path"
    FolderPath = "C:\Users\user\Desktop\temp"
    
    Set fso = CreateObject("Scripting.FileSystemObject")
    
    'Get Folder name
    FolderName = fso.GetFolder(FolderPath).Name
    
    MsgBox ("Folder Name ： " & FolderName)
    
    Set fso = Nothing
    
End Sub

Result

You got folder name！

FYI

For more information about following, see the following official online manual:

●“GetFolder method” of “FileSystemObject”

●“Name property” of “File Object”