【Excel VBA】ファイルのパスからファイル名を取得する

ファイルのパスからファイル名を抽出する。それだけのマクロです。

URLが分かっているファイルをダウンロードする場合のファイル名指定等で使用します。
サンプルコードを紹介します。

Sub URL内のファイル名を取得()
    
    Dim URL As String
    Dim FILE_name As String
    
    'URLを指定
    URL = "https://yomoyamastudy.net/wp-content/uploads/2023/04/TEST_PDF_FILE_No_01.pdf"
    
    'URLの最後の"/"以降をファイル名とする
    FILE_name = Right(URL, Len(URL) - InStrRev(URL, "/"))
    
    MsgBox FILE_name
    
End Sub

マクロ実行結果、下図のメッセージボックスが表示されます。