Boucles imbriquées
Résolu/Fermé
Bulle4805
Messages postés
2
Date d'inscription
mardi 12 février 2013
Statut
Membre
Dernière intervention
12 février 2013
-
12 févr. 2013 à 11:31
Bulle4805 Messages postés 2 Date d'inscription mardi 12 février 2013 Statut Membre Dernière intervention 12 février 2013 - 12 févr. 2013 à 13:26
Bulle4805 Messages postés 2 Date d'inscription mardi 12 février 2013 Statut Membre Dernière intervention 12 février 2013 - 12 févr. 2013 à 13:26
2 réponses
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 754
12 févr. 2013 à 12:11
12 févr. 2013 à 12:11
Bonjour,
Simplifiées, voici tes 3 boucles :
m = 1 to 9
i = 1 to 3
j = 1 to 3
next j
next i
next m
Or toi, ce que tu veux, c'est qu'à chaque valeur de i et/ou de j, m (servant d'indice à ta variable tableau) s'incrémente...
Donc, pour qu'à chaque "changement de valeur de i ou de j m = m + 1, il convient d'écrire :
N'oublie pas également de déclarer toutes tes variables :
Dim i&, j&, m&
Simplifiées, voici tes 3 boucles :
m = 1 to 9
i = 1 to 3
j = 1 to 3
next j
next i
next m
Or toi, ce que tu veux, c'est qu'à chaque valeur de i et/ou de j, m (servant d'indice à ta variable tableau) s'incrémente...
Donc, pour qu'à chaque "changement de valeur de i ou de j m = m + 1, il convient d'écrire :
m = 0 For i = 1 To 3 For j = 1 To 3 m = m + 1 strFichier(m) = "fichier_" & tableau(i) & j & "_2004.xls" Next j Next i
N'oublie pas également de déclarer toutes tes variables :
Dim i&, j&, m&
Bulle4805
Messages postés
2
Date d'inscription
mardi 12 février 2013
Statut
Membre
Dernière intervention
12 février 2013
12 févr. 2013 à 13:26
12 févr. 2013 à 13:26
Super, ça marche nickel !
Merci pikaju !
Merci pikaju !