Courbe de tendance automatique

Bonjour la communauté !

Dans mon TCD, j'aimerai rajouter une macro pour mettre en place une courbe de tendance automatique car il me semble que ce n'est pas possible sans.

C'est à dire qu'à chaque fois que je rajoute une courbe de donnée par ma liste de champ, ma courbe de tendance vient automatiquement, ou j'ai besoin d'appuyer sur le bouton "TENDANCE LINEAIRE".

Le début de code que j'essaye est le suivant :

Dim n As Integer

With Worksheets("Evolution").ChartObjects("Graphique 6").Chart

For n = 1 To 6

With SeriesCollection

.Trendlines.Add

..............................

End Sub

Le problème c'est que, déja ça ne marche pas ^^, et que je vais avoir plus que 6 courbes de données par la suite..

Je devrais rajouter une variable pour le nombre de courbe possible dans mon TCD.

Avez-vous une solution pour ça ?

Merci d'avance,