Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Avoir que les 3 derniers caractères d'un nom du fichier (avant son extension)

richert90

XLDnaute Occasionnel
Bonjour, voici mon problème:

J'ai des fichiers que je récupère: par exemple "Test001.csv", "Test002.txt", "Test003.001" etc ....
Comment je peux, en VBA, obtenir que les 3 derniers chiffres avant l'extension? Dans les cas précédents, j'aimerais garder "001", "002", "003"; Javais pensé à une fonction du genre Right mais le problème c'est le .xxxxxxx de l'extension.

Ce que je peux peut-être faire, c'est me débrouillez pour avoir le nom du fichier sans son extension puis à partir de là ne garder que les 3 derniers caractères?

Code:
nom_fichier = Split(Mid$(filetoopen, InStrRev(var_nom_fichier, "\") + 1), ".")(0)
pour avoir le fichier sans l'extension
puis ensuite je peux appliquer une fonction rigtht? est-ce que cette méthode serait judicieuse ou il y a t-il un autre moyen?

Merci d'avance

PS: désolé pour le double post
 
Dernière édition:

richert90

XLDnaute Occasionnel
Re : Avoir que les 3 derniers caractères d'un nom du fichier (avant son extension)

Bonjour Rachid et merci pour ta réponse.
Cette fonction marche sur Excel mais en VBA Peut-on l'écrire d'une façon avec Application.worksheets.xxx ?
 

Pierrot93

XLDnaute Barbatruc
Re : Avoir que les 3 derniers caractères d'un nom du fichier (avant son extension)

Bonjour à tous,

c'est fait alors je donne...
Code:
Dim t As String
t = "Test001.csv"
MsgBox Mid(t, InStrRev(t, ".") - 3, 3)

bon après midi
@+
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…