Boucle pour déclarer un nombre indéterminé de variables

Bonjour,

Je cale sur le problème suivant :

l'utilisateur introduit un nombre : nombre_equipe_par_division (ce nombre peut varier de 1 à 20... 100)

Je souhaite calculer un résultat pour chaque équipe : résultat_equipe "i", i = 1 to nombre_equipe_par_division.

Je cale sur l'écriture.

Pouvez-vous m'aider ?

Merci,

Clémentine

for i = 1 to nombre_equipe_par_division 
 resultat_equipe & i = WorksheetFunction.SumIfs(Range("L2:L" & nblignes), Range("B2:B" & nblignes), i, Range("I2:I" & nblignes), _
                    "<" & semaine_demandee + 1, Range("F2:F" & nblignes), division_demandee) _
                    + WorksheetFunction.SumIfs(Range("M2:M" & nblignes), Range("D2:D" & nblignes), i, Range("I2:I" & nblignes), _
                    "<" & semaine_demandee + 1, Range("F2:F" & nblignes), division_demandee)

Next

Bonsoir,

Dim resultat_equipe()
...
ReDim resultat_equipe(1 To nombre_equipe_par_division)
For i = 1 To nombre_equipe_par_division
    resultat_equipe(i) = ...

Cordialement.

Merci beaucoup