VBA Créer dossiers à partir de cellules Excel

Babayaga3001 Messages postés 13 Date d'inscription   Statut Membre Dernière intervention   -  
pilas31 Messages postés 1825 Date d'inscription   Statut Contributeur Dernière intervention   -
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

Réponse 1 / 7
pilas31 Messages postés 1825 Date d'inscription   Statut Contributeur Dernière intervention   646
 
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