Bonjour,

Mon problème est l'ouverture de fichier texte de nom et d'emplacement inconnus.

Je sais comment parcourir des répertoires et rechercher un fichier donner :

Pour parcourir les répertoires, je sélectionne mon répertoire de départ avec :
Set obFolder = objShell.BrowseForFolder (&H0&, "Select the folder to process", &H1&) en suite je fais la boucle suivante :For Each obFile In obFolder.Files -

Je met dans cette boucle mes conditions de recherche qui portent sur le nom et ou le type du / des fichiers recherchés (ce sont des fichiers de type text, mais d'extension variable).

La variable CheminFichier = obFolder & "\" & obFile me donne bien le chemin complet avec le nom du /des fichiers trouvés et qui correspondent bien à mes critères.

Mon problème est le suivant : Je n'arrive pas à ouvrir le fichier trouvé avec FSO.OpenTextFile.

Comment puis-je insérer CheminFichier ou obFolder et obFile ou obFile.Path (ou toutes autres variables) dans FSO.OpenTextFile pour ouvrir le fichier trouvé et l'utiliser.

Dans tous les exemples trouvés, les chemins et noms de fichiers sont définis au départ et non pas recherché par le script ...

Je vous remercie par avance pour votre aide.