Résolu Problème de compteur

[Calvus]

Bonjour,

J'ai fait un compteur très simple mais j'ai un souci...

Sub test()
Dim i As Integer

For i = 1 To 10
i = i + 1
MsgBox (i)
Next i

End Sub

J'obtiens 2 4 6 8 10....sic...

Qu'ai je raté ?

Merci

 

[Calvus]

Re : Problème de compteur

Ok, j'ai compris mon erreur. Il ne faut pas mettre i = i +1

Merci. Résolu