Import plusieurs fichiers txt dans excel Résolu

Question

Bonjour,

Je voudrais importer plusieurs fichiers.txt.
J'ai réussi à lister les noms des fichiers txt dans une feuille excel (plage nom_fichiers).
j'aimerais paramètrer une partie de la macro pour qu'il aille chercher le nom des fichiers dans la plage nom_fichiers de ma feuille excel.

Au premier tour :
'
    Workbooks.OpenText Filename:= _
        "D:\reponses\fichier1.txt", _

Au deuxième tour :

    Workbooks.OpenText Filename:= _
        "D:\reponses\fichier2_delaliste.txt", _

J'espère que ma demande est assez claire.

Merci de votre aide

lermite222 · Answer

Bonjour,
Si j'ai compris ce que tu veux...
Sub OuvreTxt()
Dim Cell As Range
    For Each cel In Range("Feuil1!FichierTxt")
        Workbooks.OpenText Filename:=cel.Value
    Next cel
End Sub
Tu dit...
A+

Import plusieurs fichiers txt dans excel

1 réponse

Discussions similaires

Newsletters