Coller une formule variable dans une cellule

Bonjour à tous,

Je souhaiterais coller dans une cellule la formule VBA suivante

Code:

---

Application.Average(Range(Cells(a + 1, 40 + i), Cells(b - 1, 40 + i)))

---

avec a, b et i des variables récupérées au préalable .

Comment faire pour coller cette formule théorique en vraie formule Excel dans ma cellule?

Merci pour votre aide,

Bonjour,

Pour affecter la formule à la cellule A1 :

Code:

---

1 2 3

Dim MaPlage As Range Set MaPlage = Range(Cells(a + 1, 40 + i), Cells(b - 1, 40 + i)) Range("A1").Formula = "=AVERAGE(" & MaPlage.Address & ")"

---

Cordialement.

Merci beaucoup, ça fonctionne parfaitement!