Steigung und Achsabschnitt in VBA

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Volker,
ich habe in meinem Tabellenblatt etliche Wertepaare X-Wert Weg von 0...100 mm in 1er Schritten und Y-Wert die gemessene Signalspannung eines Wegsensors.
Wenn ich das in ein Diagramm tu, dann kann ich die Regressionsgerade und die Parameter eintragen lassen. Ich hab es aber noch nicht geschafft die Parameter aus dem Diagramm irgendwie auszulesen (außer wirklich abzutippen). Im Tabellenblatt kann ich mit den Excelfunktionen Steigung(Y-Array, X-Array) und Achsenabschnitt(..) die Parameter m und b einer Geradengleichung ermitteln. (Es gibt aber auch die Funktion Trend die dann zu allen X-Werten die entsprechenden Y-Werte auf der Geraden errechnet.
So hab ich bisher immer gearbeitet. Das ist halt direkt in Excel mit den Statistikfunktionen.
Nur jetzt muß ich die Gerade von 0 bis 100mm, von 1 bis 99, von 2 bis 98, usw. und das auch noch für 30 verschiedene Messungen machen. Das ist so ein ziemlicher Aufwand.
In VBA mit in einer Schleife wäre das schöner. Nur finde ich hier nirgends die Funktionen Steigung und Achsenabschnitt. Ich könnte natürlich m und b mit der Formel aus einer Mathe-Formelsammlung errechnen. Wenns aber die Formel schon gäbe, dann wärs so natürlich einfacher.
Ich habs die letzten Stunden doch per Hand gemacht, denn heut um 10:00 kommt der Kunde und will die Auswertung sehen.
Wenn ich wieder mal Zeit hab, dann versuch ich es vielleicht nochmal.
Danke
Alfons

Hallo Alfons,
hab mir zum Verständnis ein Bsp mit 10 Werteparren gabastelt.
in Spalte A1-A10 die Werte 1-10, in Spalte B hab ich irgendwelche Zufallswerte
In C1 und D1 jeweils die Formeln für Steigung und Offset der Regressionsgeraden.
=STEIGUNG(B1:B10;A1:A10)
=ACHSENABSCHNITT(B1:B10;A1:A10)
Soweit richtig?
Die Formeln berechnen auch (welch Wunder?) exakt die im Diagramm angezeigten Werte.
Die braucht man also schon mal nicht abschreiben.
Du möchtest jetzt die Formeln bis zur Hälfte runterziehen.
In meinem Bsp. soll dann in C2 =STEIGUNG(B2:B8;A2:A8)
oder in D5 =ACHSENABSCHNITT(B5:B6;A5:A6) usw. stehen
Entsprechend für mehr Wertepaare.
Ich hab versucht, den 2. fixen Zeilenindex in dem array (in meinem Bsp die 10) durch 11-Zeile(A1) zu ersetzen.
Würde beim runterziehen fein säuberlich runterzählen von 10 bis 6.
Leider steht ich auf der Leitung und krieg die Verkettung im Zellbezug nicht hin.
(schäm)
so geht's schon mal nicht:
=STEIGUNG(B1:B & (11-zeile(A1) &;A1:A & (11-zeile(A1))
Hab auch schon Anführungszeichen an allen möglichen Stellen gesetzt, aber entweder ist das Formelergebnis ein Fehler oder Excel akzeptiert die Formel erst gar nicht.
Wenn Du mit der Lösung was anfangen kannst und die Formel hinbiegst, sag mir bitte Bescheid.
Falls Du nur die Formel hinbiegen kannst auch ;-)
Gruß und viel Erfolg mit Deinem Kunden
Volker
P.S.: Da Du mit Sensoren und nicht mit Kalkulationen zu tun hast, nehm ich an, dass Du kein Kaufmann sonder ein Hardwerker bist.
Habt Ihr bei euch kein Matlab o.ä.
In einem Treffer bei Google war es damit gelöst.

Beliebteste Forumthreads (12 Monate)

Steigung und Achsabschnitt in VBA

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread