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
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
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
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