Discussion :

[johannj]

Bonjour le forum,

Voici, je souhaite effectuer une régression linéaire pour renvoyer la pente et l'ordonnée à l'origine.
Le code que j'utilise actuellement est le suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
.Range("AB7").Value = "=linest(D" & CInt(up) & ":D" & CInt(down) & ",A" & CInt(up) & ":A" & CInt(down) & ", 1, 0)"

Ce code fonctionne presque bien : en effet, seule la pente de la droite est renvoyée, pas l'ordonnée à l'origine.
J'ai essayé de sélectionner deux cellules, sans résultats..
Comment faire pour avoir les deux paramètres qui s'affichent (je sens que je suis un peu ridicule...)

Autre question, si je souhaite mettre le code avec "Application.WorksheetFunction.LinEST", je tape le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
.Range("AB7").Value = Application.WorksheetFunction.LinEst(Range("B" & CInt(up) & ":B" & CInt(down)), Range("A" & CInt(up) & ":A" & CInt(down)), 1, 0)

qui me renvoie constamment une erreur type 1004. Et naturellement, je ne vois pas trop ou ça cloche !!

Ppourriez vous m'aider SVP,
Johann

[johannj]

Re,

en utilisant la fonction Index, j'ai réussi à renvoyé les deux paramètres:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
.Range("AB6").Value = "=index(linest(B" & CInt(up) & ":B" & CInt(down) & ",A" & CInt(up) & ":A" & CInt(down) & ", 1, 0),1,1)"
.Range("AC6").Value = "=index(linest(B" & CInt(up) & ":B" & CInt(down) & ",A" & CInt(up) & ":A" & CInt(down) & ", 1, 0),1,2)"

Je me pose tout de même la question s'il n'y a pas plus simple?
La fonction Linest de peut donc pas renvoyé les deux paramètres??

Johann.