XL 2010 VBA - Bouton extraction structure dossier sélectionné

Titi456

XLDnaute Junior
Bonjour,

Je recherche un code VBA à mettre sur un bouton pour pouvoir extraire la structure de tout ce qui se trouve dans un dossier sélectionné.

Exemple: Lorsque je clique sur le bouton, un explorateur de fichier apparait et je peux sélectionner le dossier dont j'aimerais extraire la structure.
Dans ma cellule A1, le nom de ce dossier apparait, dans mes cellules B2:BX les noms des fichiers se trouvant dans ce dossier apparaissent.
Si un sous-dossier se trouve dans mon dossier, etc... idem pour tous les sous-dossiers.

Je n'ai pas besoin que l'extension des fichiers extraits (.xls, .doc, .jpg, autres) soit affichée.

Pouvez-vous m'aider?

Mes meilleures salutations,

Thierry
 

Pièces jointes

  • Test.xlsx
    9.9 KB · Affichages: 5
Solution
Bonjour Titi, Oneida,
Peut être une piste à adapter en PJ.
1- Demande le dossier à traiter
2- Fait la liste des fichiers avec le chemin complet
3- En feuil2 splite les hiérarchies, un niveau par colonne, avec nom fichier en avant dernière colonne et extension en dernière colonne.
Donc je pense assez simple à adapter à votre besoin.

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Titi, Oneida,
Peut être une piste à adapter en PJ.
1- Demande le dossier à traiter
2- Fait la liste des fichiers avec le chemin complet
3- En feuil2 splite les hiérarchies, un niveau par colonne, avec nom fichier en avant dernière colonne et extension en dernière colonne.
Donc je pense assez simple à adapter à votre besoin.
 

Pièces jointes

  • Liste tout fichier dossier et sous_dossiers V2.xlsm
    32.2 KB · Affichages: 3

Discussions similaires

Statistiques des forums

Discussions
311 733
Messages
2 082 015
Membres
101 868
dernier inscrit
pierreselo33