Utilisation de FormulaR1C1

**d0n32** · 28/12/2011, 10h31

Bonjour,

Je cherche à utiliser FormulaR1C1 dans une boucle sur l'indice i. Je n'arrive pas à comprendre ce qui ne va pas dans l'expression

Code :

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

Range("A6").Offset(i, 5).FormulaR1C1 = "=IF(ISBLANK(RC[-4]),"""",SQRT(3)*R[i-1]C[6]*R[2-i]C[6]*RC[-1]*RC[-4])"

L'erreur vient de

Code :

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

R[i-1]C[6]*R[2-i]C[6]

, qui sont 2 cellules fixes dans ma feuille, mais dont la position relative est modifiée à chaque tour de boucle.

Merci d'avance

**jfontaine** · 28/12/2011, 10h39

Bonjour,

Quelle est la valeur de i pendant l'erreur? Quelle est le numéro d'erreur et son descriptif?

**Pierre Fauconnier** · 28/12/2011, 10h39

Salut.

Code :

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

Range("A6").Offset(i, 5).FormulaR1C1 = "=IF(ISBLANK(RC[-4]),"""",SQRT(3)*R[" & i & -1& "]C[6]*R[2-" & i & "]C[6]*RC[-1]*RC[-4])"

Tu dois en fait recomposer la chaîne en concaténant les données.

**d0n32** · 28/12/2011, 10h47

Bonjour et merci de vos réponses !

@jfontaine : i=0 lors de l'erreur (premier tour de boucle). ~~Une bête erreur 400...~~ Edit : au temps pour moi, erreur 1004 (erreur définie par l'application ou l'objet)

@Pierre Fauconnier : je viens d'essayer ta solution, l'erreur est toujours là. Le "i" ne risque-t-il pas d'être considéré comme un string avec cette syntaxe ?