Vba ouvrir les fichiers excel des sous dossiers, uniquement.
Résolu
Frantoc37
Messages postés
17
Statut
Membre
-
Frantoc37 Messages postés 17 Statut Membre -
Frantoc37 Messages postés 17 Statut Membre -
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
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
A voir également:
- Vba ouvrir un fichier excel
- Comment ouvrir un fichier epub ? - Guide
- Comment ouvrir un fichier bin ? - Guide
- Ouvrir un fichier .dat - Guide
- Comment ouvrir un fichier docx ? - Guide
- Comment réduire la taille d'un fichier - Guide
2 réponses
Bonjour,
Il faut auparavant rechercher les répertoires avec "filesearch" : tu as du code pour cela sur cette page
Il faut auparavant rechercher les répertoires avec "filesearch" : tu as du code pour cela sur cette page