bonjour le phorum

je vous explique mon problème, j'ai une macro qui m'ouvre, me ferme, enregistre ou kill un ou des fichiers selon le besoin
la variable et
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Fichier = Mid(ActiveWorkbook.Name, 1, InStrRev(ActiveWorkbook.Name, ".") - 1) 'J'EXTRAIE LE NOM DU FICHIER SANS EXTENSION
NomFichier = Fichier & "_" & UCase(SupprimerAccents(Left(Environ("UserName"), 3))) 'JE RENOMME LE FICHIER
ActiveWorkbook.SaveAs Filename:=répTraitement & NomFichier & ".txt", FileFormat:=xlText, CreateBackup:=False 'J'ENREGISTRE LE FICHIER AVEC SA NOUVELLE EXTENSION
Et parfois la macro plante en me disant qu'elle ne trouve pas le fichier en question...
si je supprime l'instruction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
& ".txt
ca passe...

y a t'il une raison particulière pour laquelle il modifie la condition sur l'extention à ajouter ou non (version office ?)
un peu d'aide ne serait pas de refus

merci d'avance

david