Calcul pente et ordonnees - linarité

Bonjour à tous,

Je reprends une macro mais je comprends pas grands choses sur la fonction:

p40 = WorksheetFunction.Slope(Range("s.Y40"), Range("s.X"))

o40 = WorksheetFunction.Intercept(Range("s.Y40"), Range("s.X"))

Dans mon fichier, il y a 4 parties, de gauche a droite:

• valeurs brut extraites et triées
• le calcul des tendances en fonction des critères du tableau à droite
• le tableau récapitulant les valeurs < ou > en valeur absolue entre les 2ers tableaux
• le tableau de linéarité entre 1700 et 2600

Donc je souhaites juste ajouter une T°C et calculer la linéarité puis comparer au valeur brut (en jaune) et avec des explications si possible pour les prochaines modifs.

Voir fichier pour plus d'information,

Merci pour votre aide.

Bonne soirée