Slope Funktion!

[lapunta]

Hallo, ich brauch mal wieder eure Hilfe.

Ich brauch die Steigung der Regressionsgeraden bzw. Trendlinie und habe mir folgenden Code aus dem Internet kopiert:

Code:

Sub Steigungkurz()
'Steigung der Regressionsgerade (1Woche) bestimmen

mRK = WorksheetFunction.Slope(Range("A2:A6"), Range("B2:B6"))
Range("D2") = mRK
End Sub

Dieser Code gibt mir für die Werte A2-B6 folgenden Wert aus: 0,00104174

mach ich das mit dem Diagramm und Trendlinie ist die Geradengleichung: y = 2,2446x - 84234

wobei mir der Wert 0,00104174 plausibler erscheint, wenn ich mir die Gerade im Diagramm anschaue

Wer weiß was.

[BoskoBiati]

Hallo,


zum Einen ist das ohne Daten kaum nachzuvollziehen, zum Anderen solltest Du mal die Steigung mit Hilfe der Gleichung berechnen, damit man sieht, was da raus kommt!

[lapunta]

Na, wenn's zur Lösung des Problems beiträgt, will ich mich nicht lumpen lassen.

ich hoffe, das geht so. Für den Anfang würde es mir reichen, zu wissen, ob ich prinzipiell auf der richtigen Spur bin - also ob der Range tatsächlich die entsprechenden x bzw y auswählt.

Sorry, es sieht noch ein bißchen grobschlächtig aus, aber ich bin noch am rumprobieren.

[Ego]

Hallo Lapunta,

wie kommst du darauf, dass 0,001... besser passt, die 'Regressionsgerade steigt doch in 6 Tagen um mehr als 10 Punkte.

Du hast die Regressionsparameter in der falschen Reihenfolge angegeben. Die meisten Regressionsfunktionen erwarten zuerst die Y-Werte.