recuperation d'extention de fichier

[seb]

salut à tous, salut le fil

j'ai fait une macro qui permet l'ouverture de plusieurs type de fichier, mais suivant leur extension je ne les traiterais pas de la meme facon.
comment est il possible de recuperer l'extension d'un fichier sachant que le nom du fichier peut contenir des "." comme par exemple nom.fichier.txt et moi je souhaite recupérer mon extension soit ".txt"

merci d'avance

 

[Ed]

si tu as utilisé la fonction application.filesearch
tu as les resultats dans : application.filesearch.foundfile (je crois)
sous la form d'un tableau apres il ne te rest plus qu'a le parcourir et utiliser la focntion right(application.filesearch.foundfile(i),3) et la tu aura just l'extension apres a toi de gerer ce resultat

sinon tu peux faire un recherche du caractere "." et lire ce qu'il y a apres mais je me souvien plus du nom de la fct pour chercher un caractere dans une string

voila en esperant que ca a pu t'aider

a +

 

[seb]

en fait moi je pensait faire une truc du style...

extension = Right$(fileToOpen, InStr(fileToOpen, ".") - 1)

puisque mon nom peut comporter des "." je commence à lire le nom de mon fichier par la droite et je m'arrete au premier point et je recup ce que j'ai lu !
mais ca ne marche pas !!!!

 

[Ed]

essaye avec InStrRev a la place de instr