Boucle dans boucle for

Fermé
Pierre03801 Messages postés 4 Date d'inscription jeudi 18 juillet 2013 Statut Membre Dernière intervention 12 août 2013 - 12 août 2013 à 16:41
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 12 août 2013 à 21:13
Bonjour,

J'aurai besoin de votre aide sur VBA.
J'ai une serie de donnees dans une colonne, celles-ci classees par valeurs :

Z
0
0
0
1
1
2
2
2
2
4
4
4
4
4
5
5
5

Je dois generer des calculs dans ces intervalles.
De la 1ere ligne a la derniere ligne pour chaque valeurs.
Et ces calculs doivent se renouveler pour la valeur suivante.

En gros, Tant que je suis a 0, je fais les calculs, puis je passe a la valeur 1, et ainsi desuite.

Merci d'avance pour votre aide.

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 778
12 août 2013 à 21:13
Par Exemple :
Sub test()
Dim c As Range
Dim v As Variant

v = Range("Z1").Value
For Each c In Range("Z1:Z17")
  If c.Value = v Then
    'Ici les calculs tant que la valeur ne change pas
    '...
  Else
    'Valeur suivante
    v = c.Value
    'Et ici ce qui doit changer dans les calculs pour une nouvelle valeur
    '...
  End If
Next c

End Sub
0