Créer une boucle

Fermé
Gasymazoto Messages postés 10 Date d'inscription mardi 26 février 2019 Statut Membre Dernière intervention 29 novembre 2019 - 29 nov. 2019 à 12:57
Gasymazoto Messages postés 10 Date d'inscription mardi 26 février 2019 Statut Membre Dernière intervention 29 novembre 2019 - 29 nov. 2019 à 19:38
Bonjour les amis,
Je suis nouveau en VBA mais très motivé

Voici mon souci: Dans A1, A2......A7 j'ai A1= 34 A2= 27....... et dans A7 j'ai 45 (des nombres paires et impaires pris au hasard). J'aimerai définir dans la colonne d'à côté si le nombre est paire ou impaire.

J'ai réussi dans A1 qui est un nombre paire avec 34 (mod 2=0).
Comment faire pour ne pas répéter la même action jusqu'à A7 ? Comment ecrire les instructions? de telle sorte à créer une boucle


Merci infiniment.

1 réponse

via55 Messages postés 14496 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 22 novembre 2024 2 735
29 nov. 2019 à 13:39
Bonjour

1) Pourquoi vouloir le faire par macro puisque par formule c'est possible (=SI(EST.PAIR(A1);"Pair";"Impair")

2) Néanmoins pour boucler sur les cellules
For n=1 to 7
If Range("A" & n) Mod 2 = 0 Then p = "Pair" Else p = "Impair"
Range("B" & n) = p
Next


Cdlmt
Via
0
Gasymazoto Messages postés 10 Date d'inscription mardi 26 février 2019 Statut Membre Dernière intervention 29 novembre 2019
29 nov. 2019 à 19:38
La proposition 2) me convient parfaitement, d'ailleurs je l'ai appliqué. Je suis très content et optimiste à la fois. Un grand merci.

En fait, je venais de commencer mon apprentissage sur vba alors je n'ai pas vraiment de possibilité concernant les méthodes. Ce site m'aide énormément via vos réponses

A bientôt
(j'encourage d'ailleurs débutant à s'inscrire car les expériences des personnes abonnées sont très enrichissantes)
0