Création dossier et sous-dossier sous Excel

Maryloose Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'annonce ne rien y connaître en macro ; j'ai tenté de copier-coller des macros "toutes faites" proposées sur ce forum mais elles ne correspondent pas entièrement à ce que je souhaite.

En effet, je souhaiterai savoir s'il est possible de créer des dossiers et sous-dossiers depuis un tableau Excel de ce type :

Date A - Compétition C - Poule F - Madame T - Monsieur U
Date B - Compétition E - Poule G - Madame V - Monsieur W
Date B - Compétition C - Poule H - Madame X - Monsieur Y

Résultat souhaité :

Dossier "Date" - sous-dossier "Compétition" - sous-dossier "Poule" - (et là ! je ne sais pas si c'est possible mais je tente !) sous-dossier "Madame-Monsieur".

Existerait-il un macro type que je pourrai utiliser pour chacun de mes tableaux hebdomadaires ??

Merci d'avance pour votre intérêt !
A voir également:

4 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

voir ceci:

https://excel-malin.com/codes-sources-vba/creation-dossiers-et-sous-dossiers-en-vba/

Si tes données sont dans A1, B1, C1, D1
et que tu veux créer tes dossiers dans le même dossier que ton classeur, tu remplaces:

NouveauDossierAvecSousDossiers = "C:\Temp\MonDossier\MonSousDossier\Niveau_3\Niveau_4"


par

  NouveauDossierAvecSousDossiers = ThisWorkbook.Path & "\" & Range("A1") & "\" & Range("B1") & "\" & Range("C1") & "\" & Range("D1")
0
Maryloose Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour votre aide, cependant j'ai un msg d'erreur qui apparaît :
"Erreur de compilation : Sub ou Function non définie" et la première ligne est alors surlignée en jaune ("Sub ExempleCreationDossierAvecSousdossiers()").
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
voici un exemple:

http://www.cjoint.com/c/GKCqfhLGmzQ
0
Maryloose
 
Ah ben le temps que je lise votre message la page n'est plus disponible...
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
voilà, disponible 4 jours:

http://www.cjoint.com/c/GLfn2OyUBiQ
0