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.