VBA: comment détecter un nombre pair ?

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!