Créer un dossier pour chaque ligne

[Lapincretin]

Bonjour,

Etant novice en vba, et après moultes recherches sur divers forum, je n'arrive pas à trouver ma solution.

J'ai un tableur avec 3065 lignes, pour lesquels je dois créer un sous-dossier pour chaque ligne au sein d'un dossier.

Ces dossiers seront vides pour le moment. Et le nom du dossier doit reprendre l'intitulé de la case en colonne A.

Quelqu'un aurait il ma solution ?

Merci par avance.

 

[eriiic]

Re : Créer un dossier pour chaque ligne

Bonjour,

les fonctions chdir et mkdir devraient t'aller.
Regarde l'aide excel dessus.

eric

 

[Lapincretin]

Re : Créer un dossier pour chaque ligne

Effectivement au cours de mes recherches j'ai trouvé ces fonctions, par contre comment les implémenter pour qu'elles opèrent sur chaque ligne ?

 

[Pierrot93]

Re : Créer un dossier pour chaque ligne

Bonjour,

essaye ceci :

Option Explicit
Sub test()
Dim i As Long
For i = 2 To Range("A65536").End(xlUp).Row
    'on error resume next 'au cas ou le dossier existe déjà
    MkDir "C:\MesDocs\" & Cells(i, 1)
Next i
End Sub

bon après midi
@+

 

[Lapincretin]

Re : Créer un dossier pour chaque ligne

Bonjour,

J'ai un msg qui apparaît :

Erreur d'exécutio '75' :
Erreur d'accès chemin/fichier

J'ai essayé de modeler le chemin mais y fait

 

[Pierrot93]

Re : Créer un dossier pour chaque ligne

Re,

fonctionne chez moi, chemin valide vers dossier où j'ai les droits nécessaires... attention également au contenu des cellules qui doit être valide vis à vis de windows comme nom de dossier... le dossier ne doit pas déjà exister...