coger el nombre desde la ruta

[Avellaneda]

Iniciado por ebu

hola!
alguien sabe cual es la funcion que debo usar para guardar el nombre de un archivo conociendo su ruta??
p.e. si tengo "C://Archivos de programa/nombre.doc" guardar "nombre" solo en una variable.
gracias!

Hola, las barras de separación de la ruta están al revés, pero sería algo así:

Dim aText() As String, s As String, variable As String
aText = Split("C:\Archivos de programa\nombre.doc", "\")
s = aText(UBound(aText))
variable = Left$(s, InStr(s, ".") - 1)



También lo puedes hacer así

Dim aText As String, s As String, variable As String
aText = "C:\Archivos de programa\nombre.doc"
s = Mid(aText, InStrRev(aText, "\") + 1, Len(aText))
variable = Left$(s, InStr(s, ".") - 1)