Créer repertoire et sous repertoire à partir d'un tableau

Bonjour,

J'ai bien trouvé sur le net une macro pour créer un répertoire à partir d'une liste (colonne A) dans Excel.

Je souhaiterais que sous chaque dossier de la colonne A, je puisse créer un sous-dossier dont le nom serait celui de la celulle colonne n+1, et ligne n+1.

Par ex :

dossier A1

___sous dossier B2

______sous sous dossier C3

Dossier A4

___sous dossier B5

...ETC.

Voici la macro trouvée sur le net, qui marche très bien pour créer les dossiers par la colonne A :

Sub créer_dossiers()

On Error Resume Next

Dim lig As Byte, cptr As Byte

lig = Range("A65536").End(xlUp).Row

For cptr = 1 To lig

MkDir "C:\Documents and Settings\2 bruno\Bureau\"

MkDir "C:\Documents and Settings\2 bruno\Bureau\" & Cells(cptr, 1)

Next

End Sub

Comment créer les sous-dossiers?

Merci pour votre aide.

post en double, à supprimer.

désolé,

à retirer

Je n'ai pas de chance, je venais de trouver le sujet idéal car c'est exactement mon cas que je ne trouve nulle part ailleurs:

dossier A1

___sous dossier B2

______sous sous dossier C3

Dossier A4

___sous dossier B5

Dommage que le topic ait été clôturé sans le lien vers le sujet actif car je ne retrouve pas mon cas sur le site... Si une bonne âme peut me donner le lien qui m'expliquera comment traiter ce cas précis... Merci d'avance!

Rechercher des sujets similaires à "creer repertoire partir tableau"