VBA Obtenir le nom de fichier avec GetFileName (FSO)

Ce court didacticiel montrera comment utiliser la méthode GetFileName du FileSystemObject.

Obtenir le nom du fichier avec VBA FileSystemObject

Cette leçon utilise le FileSystemObject. Pour l'utiliser, vous devrez définir une référence à la bibliothèque d'exécution du script VB. Voir ici pour plus d'informations.

Pour obtenir le nom du fichier à partir de n'importe quel chemin, vous pouvez utiliser :

123456789101112

Sous-FSOGetFileName()Dim FileName As StringDim FSO en tant que nouvel objet FileSystemDéfinir FSO = CreateObject("Scripting.FileSystemObject")'Obtenir le nom du fichierFileName = FSO.GetFileName("C:\ExamplePath\ExampleFile.txt")'Obtenir le nom du fichier sans extensionNomFichierWOExt = Gauche(NomFichier, InStr(NomFichier, ".") - 1)Fin du sous-marin

La variable FileName contiendra alors la valeur de "ExampleFile.txt", la variable FileNameWOExt sera sans l'extension "ExampleFile".

Obtenir le nom du fichier sans extension

Comme indiqué ci-dessus, pour obtenir le nom du fichier sans extension, utilisez cette ligne de code :

1	NomFichierWOExt = Gauche(NomFichier, InStr(NomFichier, ".") - 1)