Salut a tous ,
Voila mon problème je n'arrive pas a m'affranchir de l'assistant de conversion de texte, voici le code que j'utilise :
feuilleouverte = Application.Dialogs(xlDialogOpen).Show
file = ActiveWorkbook.Name
chemin = ActiveWorkbook.Path
Workbooks(file).Close
Workbooks.OpenText Filename:=(chemin & "" & file)
du coup je ferme la fenêtre et je réouvre mon fichier dans une seconde fenêtre (comme j'ai déjà l'adresse c'est plus facile)
voila si quelqu'un peut m'aider Iwill be happy