modifier la plage d application d une formule

BOnjour a tous

j ai une fonction moyenne qui me calcule donc la moyenne de données dont le nombre augmente chaque jour.

je voudrais ecrir une macro pour ne pas ralonger a la main la plage d application de la formule chaque jour.

j ai deja fait une manip similaire pour que mes graph qui se mettent a jour en fonction de la valeur "x2" que je rentre dans une cellule

Code:

---

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

Dim x1 As Integer Dim x2 As Integer Dim Plage2 As Range   Dim Ws As Worksheet   Set Ws = Sheets("Sales Graph")   x1 = Ws.Range("F30").Value x2 = Ws.Range("h30").Value   Set Plage2 = Ws.Range(Ws.Cells(8 - 1 + x1, 18).Address, Ws.Cells(8 - 1 + x2, 18).Address) Ws.ChartObjects(2).Chart.SetSourceData Source:=Plage2, PlotBy:=xlColumn

---

Donc je veux faire exactement la meme chose avec ma formule moyenne
Mon probleme c que je ne sais pas comment la désigner
Le code devrait rester ksiment le meme jusqu a la derniere ligne

Code:

---

Ws.ChartObjects(2).Chart.SetSourceData Source:=Plage2,

---

la il faut que je designe ma formule moyenne et je ne sais pas comment on fait

si qq un pouvait m aider :D
Merci

peu tu nous montre la formule que tu met pour un jour donnée ... et la formule désirée le jour suivant...

Salut,

Je te joins un exemple
la macro est dessus

le graph s ajuste tout seul en fonction des valeurs du working day que tu mets dans les cases rouge

Je voudrais que ma makro face de meme pour ma moyenne ?