VBA GetFileName을 사용하여 파일 이름 가져오기(FSO)

이 튜토리얼에서는 FileSystemObject의 GetFileName 메서드를 사용하는 방법을 보여 줍니다.

VBA FileSystemObject로 파일 이름 가져오기

이 레슨에서는 FileSystemObject를 사용합니다. 이를 사용하려면 VB 스크립트 런타임 라이브러리에 대한 참조를 설정해야 합니다.

특정 경로에서 파일 이름을 가져오려면 다음을 사용할 수 있습니다:

Sub FSOGetFileName()
    Dim FileName As String
    Dim FSO As New FileSystemObject
    Set FSO = CreateObject("Scripting.FileSystemObject") 

    'Get File Name
    FileName = FSO.GetFileName("C:\ExamplePath\ExampleFile.txt")
    
    'Get File Name no Extension
    FileNameWOExt = Left(FileName, InStr(FileName, ".") - 1)

End Sub

위 코드를 통해 FileName 변수는 “ExampleFile.txt”의 값을 가지게 되고, FileNameWOExt 변수는 확장자가 빠진 “ExampleFile”이 됩니다.

확장자 없이 파일 이름 가져오기

위에서 언급했듯이 확장자 없이 파일 이름을 가져오려면 다음 코드를 사용하면 됩니다:

FileNameWOExt = Left(FileName, InStr(FileName, ".") - 1)