Vba ouvrir les fichiers excel des sous dossiers, uniquement. [Résolu/Fermé]

Signaler
Messages postés
17
Date d'inscription
dimanche 7 février 2016
Statut
Membre
Dernière intervention
21 février 2016
-
Messages postés
17
Date d'inscription
dimanche 7 février 2016
Statut
Membre
Dernière intervention
21 février 2016
-
Bonjour,

Je voudrais qu'une macro ouvre les fichiers excel qui se trouvent uniquement dans les sous répertoires. (surtout pas dans le répertoire hôte)
Pour l'instant, j'ai fait cette macro, mais elle s'applique au répertoire hôte (thisworkbook.path)...

Sub ouvrir_fichiers()
ChDir ThisWorkbook.Path
monfichier = Dir("*.*")
While monfichier <> ""
Workbooks.Open monfichier
monfichier = Dir()
Wend
End Sub

Comment faire ??? Que faut-il ajouter ou modifier ?

Merci :-)
François

2 réponses

Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 134
Bonjour,

Il faut auparavant rechercher les répertoires avec "filesearch" : tu as du code pour cela sur cette page
Messages postés
17
Date d'inscription
dimanche 7 février 2016
Statut
Membre
Dernière intervention
21 février 2016

Super page avec sans doute tous les codes qu'il me faut !
Je vais tester tout ça !
Merci gbinforme !