Office: (Office 2007) Auslesen einer Trendlinie

Hallo zusammen,

in einem Diagramm hab ich eine ponentzielle Trendline mir anzeigen lassen mit Formel. Diese Formel will ich nun auslesen.
Leider find ich die passenden Formeln für das Excel nicht, um mir diese Parameter anzeigen zu lassen.

Kann mir da jemand helfen?
Gruß Karl


P.S.: Beim suchen fand ich nur die Berechnungen für Parameter von linearen und polynomen Kurven

:)

 

Morgen Karl,

http://www.excelformeln.de/formeln.html?welcher=269

Download Beispielmappe: http://www.excelformeln.de/bilder/regressionen.zip

cu, Bernd

 

Moin Karl,
so ein ähnliches Problem hatte ich auch mal.
Guckst Du hier:
http://www.ms-office-forum.net/forum...d.php?t=195932
Vielleicht hilfts Dir weiter.
Gruß,
Robert

 

Hi Robert,

die Parameter der Trendlinie aus dem Diagramm auszulesen ist M.E. keine gute Lösung, da diese dort gerundet ausgegeben werden.

Siehe: http://www.mp.haw-hamburg.de/pers/Ab...regression.pdf

cu, Bernd

 

Hey WOW!!!! *boah *boah *boah

Genau das was ich brauchte !!!!!!!!! *grins

Vielen Dank für die Page bst !!! *mrcool

und auch danke an die anderen für die super Antworten. *mrcool
hat mir alles bestens weitergeholfen *biggrin.gif*

Gruß Karl

 

Moin Bernd,
Da hast Du vollkommen Recht. Die RGP-Funktion hat nur einen großen Nachteil. Wenn man Lücken in der Datenreihe hat, kann man sie einfach in die Tonne treten. Da kommt dann nichts sinnvolles mehr raus. Kommt halt drauf an, wo man was braucht. Habe ich Datenreihen, bei denen ich mit Sicherheit keine Lücken drin haben werde, dann auf jeden Fall die RGP-Funktion. Ist das, aus welchen Gründen auch immer, nicht der Fall, dann nehme ich lieber eine recht grob gerundete Funktion, als was vollkommen Falsches.
Aber vielleicht hast Du ja auch eine Idee, wie man diesen Fehler der RGP-Funktion beheben kann? Da bin ich dann sehr interessiert dran. Sowas hab ich nämlich schon mal in einem Thema gesucht. Hatte nur leider keiner was schlaues gewusst.
Gruß,
Robert

 

Hallo Robert,

Du kannst wohl Logest auch mit Arrays aufrufen.

cu, Bernd
--

	A	B	C	D	E	F
1	X	Y
2	1	1		m =	1,04590194	1,04590194
3	2	5		b =	1,97257299	1,97257299
4	3	8		R2 =	0,99578156	0,99578156
5	4	15
6	7	49
7	8	65
8	9	81
9
10	X	Y
11	1	1		m =	#WERT!	1,04590194
12	2	5		b =	#WERT!	1,97257299
13	3	8		R2 =	#WERT!	0,99578156
14
15	4	15
16
17	7	49
18	8	65
19	9	81

E2 : =INDEX(RKP(B2:B8;LN(A2:A8);;WAHR);1;2)
F2 : {=myLogTrend(A2:A8;B2:B8)}
E3 : =LN(INDEX(RKP(B2:B8;LN(A2:A8);;WAHR);1;1))
F3 : {=myLogTrend(A2:A8;B2:B8)}
E4 : =INDEX(RKP(B2:B8;LN(A2:A8);;WAHR);3;1)
F4 : {=myLogTrend(A2:A8;B2:B8)}
E11 : =INDEX(RKP(B11:B19;LN(A11:A19);;WAHR);1;2)
F11 : {=myLogTrend(A11:A19;B11:B19)}
E12 : =LN(INDEX(RKP(B11:B19;LN(A11:A19);;WAHR);1;1))
F12 : {=myLogTrend(A11:A19;B11:B19)}
E13 : =INDEX(RKP(B11:B19;LN(A11:A19);;WAHR);3;1)
F13 : {=myLogTrend(A11:A19;B11:B19)}

Option Explicit

Function myLogTrend(rX As Range, rY As Range) As Variant
Dim arX, arY, arRKP, i%, arXNeu, arYNeu, iNeu%, arErg(1 To 3, 1 To 1) As Double

arX = rX
arY = rY

If UBound(arX) <> UBound(arY) Then Exit Function

For i = 1 To UBound(arX)
If arX(i, 1) <> 0 And arY(i, 1) <> 0 Then iNeu = iNeu + 1
Next

Redim arXNeu(1 To iNeu)
Redim arYNeu(1 To iNeu)
iNeu = 1
For i = 1 To UBound(arX)
If arX(i, 1) <> 0 And arY(i, 1) <> 0 Then
arXNeu(iNeu) = Log(arX(i, 1))
arYNeu(iNeu) = arY(i, 1)
iNeu = iNeu + 1
End If
Next

arRKP = Application.WorksheetFunction.LogEst(arYNeu, arXNeu, , True)
arErg(1, 1) = arRKP(1, 2)
arErg(2, 1) = Log(arRKP(1, 1))
arErg(3, 1) = arRKP(3, 1)

myLogTrend = arErg
End Function

 

Hallo Bernd,
das sieht ja sehr genial aus.
Nur leider muss ich jetzt gestehen, dass ich nicht weiß, wie ich diese Funktion aus der Exceltabelle aufrufe. Wenn ich in die Zellen das eingebe, was bei Dir steht, passiert bei mir nix. Vielleicht hab ich die Funktion auch an einer falschen Stelle hinterlegt. Bei mir liegt sie zur Zeit in einem Modul bzw. hinter der Tabelle. Oder brauche ich eine Tastenkombination?
Ich steh auf dem Schlauch.
Gruß,
Robert

 

Hallo Robert,

die Funktion liefert eine Matrix aus 3 Zeilen x 1 Spalte zurück und ist demzufolge also auch als Matrixformel einzugeben.

Markiere 3 direkt untereinanderliegende Zellen z.B. F2:F4, gibt die Formel dort normal ein (ohne den geschweiften Klammern!) und bestätige sie am Ende mit Strg+Shift+Return, nicht nur mit einem einfachen Return.

cu, Bernd

 

Hallo Bernd,
ich danke Dir! *top
Du hast ein bei mir schon lange bestehendes Problem gelöst.
Gruß,
Robert