Affectation de la valeur d'une cellule

Fermé
Aurélien - 4 déc. 2009 à 10:50
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 4 déc. 2009 à 10:58
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 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
4 déc. 2009 à 10:58
Bonjour,

Quel est le type de la variable J ?

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

0