VBA Créer dossiers à partir de cellules Excel

Babayaga3001 Messages postés 13 Statut Membre -  
pilas31 Messages postés 1878 Statut Contributeur -
Bonjour,

Je me sens vraiment bête de poser cette question, mais j'ai beau éplucher les sites web, je n'y arrive pas...

Je possède une liste de cellules avec des noms différents et souhaite enregistrer un dossier au nom de chaque cellule (de A1 à A33), sur la feuille "Feuil1". Le dossier dans lequel je souhaite enregistrer ces sous-dossiers se nomme "C:\Users\Marine\Dropbox".

Pouvez-vous m'indiquer la marche à suivre SVP ?

Mille merci !

Marine

7 réponses

  1.
    pilas31 Messages postés 1878 Statut Contributeur 648
     
    Bonjour,

    Voici une macro qui doit fonctionner : 
    Sub Creer_Dossiers()
    Dim ligne As Integer
    ChDir "C:\Users\Marine\Dropbox"
    For ligne = 1 To 33
    MkDir Sheets("Feuil1").Cells(ligne, 1).Value
    Next ligne
    End Sub


    Cordialement,
    0

Discussions similaires

Aller chercher une valeur dans une autre feuille
nicodurv -
Gyrus -

9 réponses
comment ouvrir un fichier save
alex3812 -
Pierrecastor -

6 réponses
Dessiner une courbe à partir de l'équation dans Excel
Licorne rose -
Laura Holt -

5 réponses
Aller à la ligne dans cellule (Excel 2010 sur Mac)
Brig92 -
Maico490 -

10 réponses
Nommer des fichiers en masse à partir d'une liste
Philobae -
contrariness -

9 réponses
export contacts Gmail : Problème conversion csv en xlsx
vegamax -
Alain -

5 réponses