Bedingte Summierung von zwei Spalten,

Forumthread: Bedingte Summierung von zwei Spalten,

06.10.2004 18:44:31

zwei

Hallo,
ich möchte zwei Spalten (A und B)so weit summieren, bis die Summe in Spalte
A einen Wert von einer bestimmten Zelle erreicht oder übersteigt.Die Summierung muß aber von dem kleinsten Wert in Spalte B aufsteigend abläufen.
Als Ergebnis sollten die Summen von den Spalten A und B und die Zahl der mit gezählten Zeilen entstehen.
Muß ich erst die Daten nach den Werten in B aufsteigend ordnen, oder kann man
es durch eine Schleife lösen?
Kann das jemand lösen?
Vielen Dank
Ophir

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Bedingte Summierung von zwei Spalten,

zwei

Unter der Voraussetzung, dass "Spalte B" sortiert ist, z.B. ad hoc und ohne lange zu überlegen (oder zu testen):
Kopiere folgende Funktion in ein Modul:
'==============================


Function summeBisGrenzwert(colA As Range, colB As Range, grenzwertRng As Range, ABoderZeile As String) As Double
Dim n As Integer
Dim sumA As Double
Dim sumB As Double
Dim grenze As Double
Dim c As Range
grenze = grenzwertRng.Value
sumA = 0
sumB = 0
n = 1
For Each c In colA
sumA = sumA + c.Value
sumB = sumB + c.Offset(0, colB.Column - colA.Column).Value
If sumA >= grenze Then Exit For
n = n + 1
Next
If ABoderZeile = "A" Then
summeBisGrenzwert = sumA
ElseIf ABoderZeile = "B" Then
summeBisGrenzwert = sumA
ElseIf ABoderZeile = "Zeilen" Then
summeBisGrenzwert = n
End If
End Function

'==========================
Beispiel zur Umsetzung:
Wenn die erste Spalte von B4 bis B200 geht ("Spalte A") und die zweite Spalte von M4 bis M200 und in C10 der Grenzwert, dann in die Zellen A1, A2, und A3 folgende Formelneingefügen:
=summeBisGrenzwert($B$4:$B$200;$M$4:$M$200;$C$10;"A")
=summeBisGrenzwert($B$4:$B$200;$M$4:$M$200;$C$10;"B")
=summeBisGrenzwert($B$4:$B$200;$M$4:$M$200;$C$10;"Zeilen")
Dann sollten in A1 die "Summe A", in A2 die "Summe B" und in A3 die Anzahl der summierten Zeilen stehen.
Das geht möglicherweise auch einfacher und solche Funktionen haben natürlich auch immer den Nachteil, dass die Mappe dadurch sehr langsam werden kann.

AW: Bedingte Summierung von zwei Spalten,

zwei

Hi Ophir,
sieht lösbar aus, aber ich verstehs nicht ganz. Lade mal Beipieltabelle hoch wo man sieht was rasukommen soll.
Gruß
Reinhard

AW: Bedingte Summierung von zwei Spalten,

zwei

Hallo und danke für die Antworten.
Hier im beigefügten Rechenbeispiel
https://www.herber.de/bbs/user/11767.xls
sollte es wie folgt laufen:
Die Matrize auf der Rechten Seite ist eine Entfernungstabelle
von den Entfernungen zwischen den gegebenen Ortschaften.
Für jede Ortschaft sollen die Entfernungen von der Kleinsten aufsteigend
summiert werden. Von jeder Zeile die eingezählt wurde wird auch die Zelle in Spalte MM99
summiert, aber nur solange bis der Wert der für den Anfangspunkt steht überstiegen wird.
Nehmen wir Fürth als Beispiel: Da werden nur die Entfernungen nach Langenfeld und Ansbach summiert. Weil die Summe der Werten die in ihrer Zeilen unter Spalte MM99
den Wert der in der Zeile von Fürth (in dem Fall:77.760.863,00)
übersteigt, hört der Vorgang auf, und die Summen und die Zahl der Städte wird gegeben. Also die Summe 92 der Entfernungen, und die Zahl der Städten 2.
Rothenburg wird nicht mehr mitgezählt.
Wie gesagt, die Entfernungen sind nicht sortiert. Jedes Mal muß die nächste minimale Entfernung gefunden und addiert, die Stadt gezählt und die Summe der Werte von den Zellen in MM99 verglichen.
Ich hoffe, daß es mit dem Anhang klar wird, und daß es mit einer Konvenzionellen Schleife im XL lösbar ist.
Danke euch
Ciao
Ophir

Es ist schön dass die datei sehr klein ist...

Reinhard

Hi Ophir,
... und nicht einige MB groß ist, aber irgendetwas sollte schon drin stehen *grienkicher*
Gruß
Reinhard

AW: Es ist schön dass die datei sehr klein ist...

Ophir

Tut mir Leid, ich habe noch nicht alle MM99 Werte vorbereitet.
es muß für ca. 65 Ortschaften durchgeführt werden.
Gruß
Ophir

AW: Es ist schön dass die datei sehr klein ist...

Reinhard

Hi Ophir,
zum Beantworten der Frage langen einige wenige Orte, ausreichend viele, dass man die Struktur der Tabelle erkennt. Von daher kannste auch die Entfernungen einfach so reinschreiben, ist egal ob sie in Wahrheit stimmen.
Gruß
Reinhard

AW: Es ist schön dass die datei sehr klein ist...

Ophir

Ich bedanke mich,
aber ich kann erst morgen weiter machen.
Vielen Dank
schönen Abend noch!
Ciao
Ophir

Beliebteste Forumthreads (12 Monate)

Bedingte Summierung von zwei Spalten,

Forumthread: Bedingte Summierung von zwei Spalten,

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Bedingte Summierung von zwei Spalten,

Forumthread: Bedingte Summierung von zwei Spalten,

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread