Quelqu'un peut il me dire ce qui cloche a mon code !

[Jare]

Bonjour à tous,

Quelqu'un peut il me dire ce qui cloche a mon code !

For i = 2 To Range("a1").CurrentRegion.Rows.Count
Cells(i, 5).FormulaR1C1 = IIf(Cells(i, 1).Value <> "", Cells(i, 5).FormulaR1C1 = "=RC[1]/0.75)", "")
Next

Sa devrai me donner une formule ! mais j'obtient "FAUX" à la place !!

d'avance merci.

Jare

 

[STéphane]

For i = 2 To Range("a1").CurrentRegion.Rows.Count
Cells(i, 5).FormulaR1C1 = IIf(Cells(i, 1).Text <> 0, "=RC[1]/0.75", "")
Next

 

[Rolilandon]

salut Jare


Cells(i, 5).FormulaR1C1 = "=R" & i & "C1/0.75"

 

[Jare]

merci STéphane et Rolilandon,

mais sa ne marche pas la cellule affiche toujours le texte "FAUX" !!!

Si quelqu'un à une idée !!

merci