Editer Formule vba

Bonjour,

J'essaye un moyen d'editer une formule dans excel via VBA

Code:

---

1 2 3

current_formula = final.Cells(2,2) final.Cells(2,2FormulaLocal = "=" & current_formula& "+" & 100

---

sachant que dans ma formule initiale, j'ai par exemple :
=70+40

et que le resultat que je souhaite soit :
=70+40+100

toutes mes tentatives que j'ai pour l'instant me donnent :
=110+100
je n'arrive donc pas a conserver les deux nombres du debut ...

merci d'avance pour votre aide !
alex

Bonjour,

Une idée a peaufiner

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim i As Integer   For i = 1 To 100 Step 10   If Range("A1").FormulaLocal = "" Then Range("A1").FormulaLocal = "="   Range("A1").FormulaLocal = Range("A1").FormulaLocal & "+" & i   Next i

---

Bon courage

j'ai trouvé, apres 3h de recherches .. le fait de poster ici m'a debloqué la situation ...

Code:

---

1 2 3 4 5

current_formula = final.Cells(2,2).Formula stri = current_formula & "+" & 100 final.Cells(2,2).FormulaLocal = stri

---

Bonjour à tous
Bonjour adummm

Essaie comme ceci :

Code:

---

1 2 3 4

Sub essai_01() current_formula = Cells(2, 2).Formula Cells(2, 3).FormulaLocal = current_formula & "+" & "100" End Sub

---

si j'ai bien compris

Eric

NB : Pas raffraichi. Bonjour jfontaine