VBA Obtener nombre de archivo con GetFileName (FSO)

Este breve tutorial demostrará cómo utilizar el método GetFileName de FileSystemObject.

Obtenga el nombre de archivo con VBA FileSystemObject

Esta lección usa FileSystemObject. Para usarlo, deberá establecer una referencia a la biblioteca de tiempo de ejecución de secuencias de comandos de VB. Consulte aquí para obtener más información.

Para obtener el nombre del archivo de cualquier ruta, puede usar:

123456789101112

Sub FSOGetFileName ()Dim FileName como cadenaAtenuar FSO como nuevo FileSystemObjectEstablecer FSO = CreateObject ("Scripting.FileSystemObject")'Obtener nombre de archivoFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Obtener nombre de archivo sin extensiónFileNameWOExt = Left (FileName, InStr (FileName, ".") - 1)End Sub

La variable FileName contendrá el valor de "ExampleFile.txt", la variable FileNameWOExt no tendrá la extensión "ExampleFile".

Obtener nombre de archivo sin extensión

Como se señaló anteriormente, para obtener el nombre del archivo sin extensión, use esta línea de código:

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