Discussion :

[axellbt2]

Bonjour,

J'aurais besoin d'aider pour finaliser ma macro. Et je ne suis pas du tout développeur et suis très débutant

J'essaie de faire une boucle pour que la macro crée 5 dossiers avant d'y ajouter différents fichiers.
J'ai réussi à le faire en séquentiel en faisant une ligne de code par dossier à créer mais j'aimerais l'alléger pour pouvoir en ajoutant sans modifier plusieurs lignes.

Voici mon code simplifié où ça ne fonctionne pas. En effet, au lieu de créer le dossier "exemple1" dans le bon dossier, cela me crée un dossier "dossier1". Visiblement, mon ("dossier" & m) est traduit en "dossier1" et non en dossier1 qui renverrai "C://.../exemple1".

Est-ce que quelqu'un a une solution a me proposer ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
Sub Test()
 
Dim Dossier1 As String
Dim Dossier2 As String
Dim Dossier3 As String
Dim Dossier4 As String
Dim Dossier5 As String
 
Dim m As Integer
 
'Destinations des fichiers
    'Dossiers
Dossier1 = "C://.../exemple1"
Dossier2 = "C://.../exemple2"
Dossier3 = "C://.../exemple3"
Dossier4 = "C://.../exemple4"
Dossier5 = "C://.../exemple5"
 
'Création des dossiers
For m = 1 To 5
 
    If Dir(("Dossier" & m), vbDirectory) <> vbNullString Then
Else
        MkDir ("Dossier" & m)
End If
 
Next m
 
End Sub

Merci beaucoup par avance
Axel

[Philippe Tulliez]

Bonjour,
Vous ne pouvez construire une variable à l'aide d'une boucle.
Soit vous utilisez une seule variable nommée "Dossier" et vous modifiez la valeur à lui transmettre avec par exemple "Exemple" & m (étant la valeur de la boucle) soit si vous souhaitez stocker au préalable le chemin ou le nom du dossier, il vous faut passer par une variable dimensionnée comme par exemple Dossier(1) = "Exemple1" Dossier(2) = Exemple2, etc.

Pour en savoir plus sur les variables dimensionnées Utiliser les variables tableaux en VBA Excel

[axellbt2]

Bonjour,
Vous ne pouvez construire une variable à l'aide d'une boucle.
Soit vous utilisez une seule variable nommée "Dossier" et vous modifiez la valeur à lui transmettre avec par exemple "Exemple" & m (étant la valeur de la boucle) soit si vous souhaitez stocker au préalable le chemin ou le nom du dossier, il vous faut passer par une variable dimensionnée comme par exemple Dossier(1) = "Exemple1" Dossier(2) = Exemple2, etc.

Pour en savoir plus sur les variables dimensionnées Utiliser les variables tableaux en VBA Excel

Merci beaucoup