Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

addieren positiver Werte

addieren positiver Werte
27.08.2007 11:43:00
Norman
Hallo Leute,
ich habe eine Exceltabelle in der sich Höhenangaben zu Wegpunkten befinden. Ich möchte nun die Höhenmeter (also die Meter des Anstiegs addieren). Dazu ein kleines Beispiel:
Pkt;Höhe (NN);
1; 650
2; 642
3; 752
4; 942
D.h. von Wegpunkt 1 zu 2 geht es bergab - also keine "Höhenmeter". Von Pkt. 2 auf 3 sind es hingegen 90m; von 3 auf 4 nochmal 190. In der Summe habe ich also 280 hm zurück gelegt. Da ich nun aber wesentlich mehr Wegpunkte habe möchte ich dies automatisieren. Wei mache ich das einfach, schnell und zuverlässig.
(https://www.herber.de/bbs/user/45410.xls)
Schon mal vorab DANKE

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: addieren positiver Werte
27.08.2007 11:51:00
Iris
Hi Norman,
angenommen Pkte stehen in Spalte A und NN in Spalte B und los gehts in Zeile 2.
Dann steht in B2: 0
und in B3:=WENN(A3-A2>0;B2+(A3-A2);B2)
und das müsstest Du runterkopieren können...
Viel Erfolg beim virtuellen Wandern! Iris

AW: addieren positiver Werte
27.08.2007 11:52:00
Iris
Sorry, ersetze
A durch B
und B durch C!!!!
Dann steht in C2: 0
und in C3:=WENN(B3-B2>0;C2+(B3-B2);C2)

AW: addieren positiver Werte
27.08.2007 11:52:29
Marian
Hallo Norman,
Angenommen Punkt 1 ist in Zelle A1 und Punkt 2 in Zelle A2 etc. Dann schreibst du in die Zelle B1 folgende Formel:
=WENN(A2>A1;A2-A1;0)
und zuunterst kannst du dann die Summe der Spalte B nehmen.
gruss,
Marian

Anzeige
AW: addieren positiver Werte
27.08.2007 13:01:00
Striker
Hey Norman
Hier habe ich deine Datei einmal bearbeitet... Hast Du es Dir ungefähr so vorgestellt... :
https://www.herber.de/bbs/user/45416.xls
Gruß Sebastian
P.S. Feedback ist immer toll...

und wenn Dich eine VBA Lösung interessiert ...
27.08.2007 14:06:00
Matthias
Hallo
VBA-Lösung für diese Beispieldatei

Sub Hoehenmeter()
Dim x As Long, j As Long, zE As Long
zE = Cells(Rows.Count, 4).End(xlUp).Row
MsgBox " Berechnung wird berücksichtigt bis Zeile " & zE
For x = 2 To zE
If Cells(x, 4) > Cells(x - 1, 4) Then j = j + Cells(x, 4) - Cells(x - 1, 4)
Next
MsgBox "Zurückgelegte Höhe = " & Format(j, "#,##") & " Meter"
End Sub


Userbild

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige