Discussion :

[jbggg]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[fred65200]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[jbggg]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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