Bonjour j'essaye actuellement de faire une macro qui me permet de mettre une colonne de 1 à partir de la cellule E2.
mon code donne :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub test()
dim i as integer
dim cellule as Range
set cellule = Range("E2")
for i=1 to 10
cellule.select
ActiveCell.formulaR1C1 = "1"
cellule = cellule.offset(1,0)
Next i
End sub
quand je lance la macro j'ai un soucis j'ai bien un 1 qui est écrit en E2 mais il est éffacé immédiatement.

Si quelqu'un peut m'aider