probleme de range

bonjour,

alors voici mon problème, comment utiliser un range avec une boucle.
voici le code que j'ai tapé mais ce n'est pas correct:

Code:

---

1 2 3 4 5 6 7 8

Range("calcul1!C11") = point   For i = 1 To point Range("calcul1!Ax") = y x = x + 2 y = y + 1 Next i End If

---

j'ai aussi essayer en remplacant "Range("calcul1!Ax") = y" par "cells(x,1)" mais je ne sais pas comment lui dire que c'est la cellule de la feuille2 et non de la 1

bonjour,
apprès avoir initialisé x et y,essaie

Code:

---

1 2 3 4 5 6

Point = Range("Calcul1!C11") For i = 1 To Point Range("Calcul1!A" & i) = y x = x + 2 y = y + 1 Next i

---

cordialement

oui j'ai initialiser i, x, y et point

Code:

---

1 2 3 4 5 6

Point = Range("Calcul1!C11") For i = 1 To Point Range("Calcul1!A" & x) = y y = y + 1 x=x+2 Next i

---

c'est bon