Affectation de la valeur d'une cellule

Aurélien -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,

je ne comprends pas pourquoi j'ai une incimpatibilité de type (erreur 13) quand je lance cette macro :

For i = 1 To 8920
j = Range("I" & i).Value 'il s'agit d'un nombre entier
Rows(i).Columns(j).Select
ActiveCell.FormulaR1C1 = "1"
Next

quelqu'un peut il m'aider?

Merci

1 réponse

Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Quel est le type de la variable J ?

On peut faire comme ça : Rows(i).Columns(CInt(j)).Select

0