Bonjour à tous,

Voila, j'ai plusieur dossiers (Folder1) a consulter. Cacun de ses dossiers sont décomposé de la même manière.

La boucle suivante permet de parcourir des fichiers dans un dossier mais je n'arrive pas à l'adapter pour parcourir des dossiers dans des dossiers

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
Dim fso As New FileSystemObject
Dim fich As file
Dim Rep As Folder
 
    Set Rep = fso.GetFolder("C:\")
    For Each fich In Rep.Files
         ..........
    Next
Quelqu'un pourrait-il m'éclaircir.

Merci d'avance.

Marsup