VBA: comment détecter un nombre pair ?

Résolu/Fermé
mod77 Messages postés 1273 Date d'inscription vendredi 10 juillet 2009 Statut Membre Dernière intervention 14 janvier 2024 - Modifié par mod77 le 27/10/2012 à 16:16
 Nico - 4 oct. 2016 à 10:07
Bonjour,

Je n'arrive pas à afficher les nombres pairs dans la boucle suivante:

for i =1 to 4

If i = Odd Then 'si i impair
Cells(12, "A").Value = i

Else 'si i pair
Cells(12, "B").Value = i

End If

next

Elle m'affiche tous les nombre sans passer par then mais seulement par Else.

Pouvez-vous me dire où il y a l'erreur SVP ?

Merci.



Savoir dire NON est un devoir et une force! N'ayez pas peur! L'union fait la force!

Passez en résolu si ça l'est!

2 réponses

mod77 Messages postés 1273 Date d'inscription vendredi 10 juillet 2009 Statut Membre Dernière intervention 14 janvier 2024 53
27 oct. 2012 à 16:25
Je réponds à ma question moi-même car je viens de trouver ce ci:

for i =1 to 4

If i mod 2 <>0 Then 'si i impair
Cells(12, "A").Value = i

Else 'si i pair
Cells(12, "B").Value = i

End If

next
25