archivo VBA desde la ruta
Dim path As String
path = "C:\Temp\data\myfile.txt"
Debug.Print Mid$(path, InStrRev(path, "\") + 1) ' -> myfile.txt
VasteMonde
Dim path As String
path = "C:\Temp\data\myfile.txt"
Debug.Print Mid$(path, InStrRev(path, "\") + 1) ' -> myfile.txt