Bonjour à tous,
 
J'aimerai pouvoir importer tous les fichiers txt d'un dossier dans un fichier correspondant. Par exemple j'ai 3 fichiers txt (ex1.txt, ex2.txt et ex3.txt) et j'aimerai avoir 3 fichiers xls (ex1.xls, ex2.xls et ex3.xls)
 
Pour le moment je procède de la façon suivante :  
 
'Importer le fichier txt  
    ChDir "C:\Users\stagiaire\Documents\EXCEL"  
    Workbooks.OpenText Filename:="C:\Users\stagiaire\Documents\EXCEL\INSERT-FORCES-GP01.txt", _  
        Origin:=xlMSDOS, _  
        StartRow:=1, _  
        DataType:=xlDelimited, _  
        TextQualifier:=xlDoubleQuote, _  
        ConsecutiveDelimiter:=True, _  
        Tab:=False, _  
        Semicolon:=False, _  
        Comma:=False, _  
        Space:=True, _  
        Other:=False, _  
        FieldInfo:=Array(1, 1), _  
        TrailingMinusNumbers:=True  
 
J'aimerai donc savoir si c'est possible et si oui de quelle façon.
 
Merci d'avance

 
           Oui c'est possible.       Commencer par voir l'exemple dans l'aide de la fonction  Dir  …
 
           Edit :  ensuite penser à l'enchaînement logique de la procédure, en gros structurer sa pensée avant de passer au codage.