droite d'équation y = ax + b

HERBIN · 2 Mai 2012

bonsoir
j'ai rédigé un code vba avec pour trouver l'équation y = ax + b avec linest, j'ai uniquement a . comment obtenir la constante b ?

Code:

Sub LinEst2VBA()
    Dim v As Variant, x As Variant, Y As Variant
    x = Range("a1:a6")
    Y = Range("b1:b6")
    v = Application.LinEst(Y, x, True, True)
    Range("d2") = v
End Sub

Merci pour votre aide
cordialement
herbin

ROGER2327 · 2 Mai 2012

Re : droite d'équation y = ax + b

Bonsoir HERBIN

Pour récupérer le deuxième coefficient, écrivez :

VB:

Sub LinEst2VBA()
    Dim v As Variant, x As Variant, Y As Variant
    x = Range("A1:A6")
    Y = Range("B1:B6")
    v = Application.LinEst(Y, x, True, True)
    Range("D2:E2") = v
End Sub

Pour récupérer tous les paramètres, écrivez :

VB:

Sub LinEst2VBA()
    Dim v As Variant, x As Variant, Y As Variant
    x = Range("A1:A6")
    Y = Range("B1:B6")
    v = Application.LinEst(Y, x, True, True)
    Range("D2:E6") = v
End Sub

ROGER2327
#5847

Vendredi 13 Palotin 139 (Esquive de Saint Léonard da V, illusioniste - fête Suprême Quarte)
13 Floréal An CCXX, 8,4224h - bâton-d'or
2012-W18-3T20:12:50Z

HERBIN · 3 Mai 2012

Re : droite d'équation y = ax + b

merci pour votre aide roger

droite d'équation y = ax + b

HERBIN

Guest

ROGER2327

XLDnaute Barbatruc

HERBIN

Guest

Discussions similaires

droite d'équation y = ax + b

HERBIN

Guest

ROGER2327

XLDnaute Barbatruc

HERBIN

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency