Formule R1C1 avec String

Bonjour,

Voici mon code qui pose probleme au niveau de la dernière ligne et je ne comprends pas pkoi. Si vouz pouvez m'aider merci.

formule1 contient une formule sous forme d'un string que je veux affecter dans un activecell.formulaR1C1.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub RendeAnnualise() Dim formule1 As String   formule1 = "(1+RC[-39])"   For i = 2 To 38 formule1 = formule1 & "*(1+RC[" & -39 + i & ")" Next i   Range("CJ33").Select   ActiveCell.FormulaR1C1 = "=100*" & formule1   End Sub

---

Merci

formule1 ça te renvoie quoi a la fin elle est égale a quoi la variable ?

ça te fait une erreur ? ça plante ? ça tourne mais ça met pas la bonne formule ?

C'est bon j'ai trouvé mon erreur c'était tout bete, j'avais oublié une ] dans mon code.

Merci et désolé de vous embetter sur une betise.