フルパスからファイル名を取得する構文（拡張子あり）
フルパスからファイル名を取得する構文は次のとおりです。
'ファイル名を取得する（拡張子あり）
Dim fso As Object
Dim fileName As String
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = fso.getFileName("ファイルパス")
Set fso = Nothing
'使用例
Dim fso As Object
Dim fileName As String
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = fso.getFileName("C:\test\Book1.xlsx") ' fileNameに「Book1.xlsx」が代入される
Set fso = Nothing
フルパスからファイル名を取得する構文（拡張子なし）
フルパスからファイル名を取得する構文は次のとおりです。
'ファイル名を取得する（拡張子なし）
Dim fso As Object
Dim fileName As String
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = fso.GetBaseName("ファイルパス")
Set fso = Nothing
'使用例
Dim fso As Object
Dim fileName As String
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = fso.GetBaseName("C:\test\Book1.xlsx") ' fileNameに「Book1」が代入される
Set fso = Nothing
