Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1644to1648
1644to1648
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen addieren wenn Bedingungen erfüllt sind

Forumthread: Zeilen addieren wenn Bedingungen erfüllt sind

Zeilen addieren wenn Bedingungen erfüllt sind
24.09.2018 13:27:38
Samantha
Hallo zusammen,
Ich bräuchte ein Makro, dass mir Werte in zwei Spalten zusammen rechnet wenn zwei Bedingungen erfüllt sind.
Ausgangstabelle
A B C D
5 2 500 30
5 2 300 20
4 1 200 66
4 2 600 78
2 5 500 52
1 5 700 100
Endtabelle
A B C D
5 2 800 50
4 1 200 66
4 2 600 78
2 5 500 52
1 5 700 100
Das Makro soll in Spalte A schauen ob es doppelte Werte gibt. Wenn ja soll er in Spalte D schauen ob die Werte auch gleich sind.
Wenn ja dann soll er in Spalte C und in Spalte D die Werte addieren und anschließend die überflüssigen Zeilen löschen.
Kann mir hier jemand weiterhelfen?
Danke
Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
24.09.2018 13:44:53
Daniel
Hi
Muss es ein Makro sein?
Mit Hilfe der Pivittabelle ließe sich die Auswertung mit ein paar Klicks zusammenstellen.
Gruß Daniel
AW: Zeilen addieren wenn Bedingungen erfüllt sind
24.09.2018 13:45:20
ChrisL
Hi
In Spalte E und F die Formel einsetzen
=SUMMEWENNS(C:C;$A:$A;$A1;$B:$B;$B1)
=SUMMEWENNS(D:D;$A:$A;$A1;$B:$B;$B1)
Formel in Werte umwandeln. Duplikate entfernen. Spalten C und D löschen.
Der Vorgang müsste sich mit dem Makrorekorder aufzeichnen lassen.
cu
Chris
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
24.09.2018 13:48:20
Toastie
Entweder habe ich deine Erläuterung nicht verstanden oder dein Beispiel passt nicht. Summieren soll er doch nur wenn die Werte in Spalte A und in Spalte D identisch sind (so stehts zumindest in deinem Text). Oder meintest du Spalte B?
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 10:30:46
Samantha
Hallo
Danke für eure Rückmeldungen. Ich meine natürlich Spalte B.
Also ein Makro wäre mir lieber, da mein ganzes Excelsheet anschließend mit einem Makro bearbeitet werden soll.
Vielen Dank.
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 10:38:23
Samantha
Ich hab die Formel ausprobiert. Allerdings liefert mir die Formel falsche Ergebnisse. Da es vorkommen kann, dass in Spalte A die ID auch 10mal vorkommt und nur wenn dann die Spalte B auch immer das gleich drin steht soll er mir die Spalte C und D summieren.
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 10:43:05
Samantha
https://www.herber.de/bbs/user/124201.xlsx
Das wäre meine Beispieldatei
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 11:11:18
daniel
Hi
eine Möglichkeit wäre diese, das ist jetzt etwas fortgeschrittenere Programmiertechnik
Sub test()
Dim ID As String
Dim arrID
Dim arrWerte
Dim dic1 As Object
Dim dic2 As Object
Dim z As Long
With ActiveSheet.Cells(1, 1).CurrentRegion
arrID = .Columns(1).Resize(, 2).Value
arrWerte = .Columns(3).Resize(, 2).Value
Set dic1 = CreateObject("scripting.dictionary")
Set dic2 = CreateObject("scripting.dictionary")
For z = 2 To UBound(arrID, 1)
ID = arrID(z, 1) & arrID(z, 2)
dic1(ID) = dic1(ID) + arrWerte(z, 1)
dic2(ID) = dic2(ID) + arrWerte(z, 2)
Next
For z = 2 To UBound(arrID, 1)
ID = arrID(z, 1) & arrID(z, 2)
arrWerte(z, 1) = dic1(ID)
arrWerte(z, 2) = dic2(ID)
Next
.Columns(3).Resize(, 2).Value = arrWerte
.RemoveDuplicates Array(1, 2), xlYes
End With
End Sub

Gruß Daniel
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 11:21:29
Samantha
Meine Programmierkenntnisse reichen zwar nicht aus um das Makro im Detail zu verstehen aber es funktioniert einwandfrei.
Vielen Dank dafür.
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 11:58:52
daniel
HI
dann probiere mal das, hier ist der Ablauf etwas leichter verständlich und entspricht dem, was man sinnvollerweise in Excel tun würde, wenn man die Aufgabe von Hand ohne VBA-Unterstützung lösen müsste (optimiert für große Datenmengen).
dh du kannst den Code im Einzelstep ausführen und dir dabei anschauen, was in der Exceltabelle passiert um es nachzuvollziehen und zu verstehen:
Sub test()
With Cells(1, 1).CurrentRegion
.Sort key1:=.Cells(1, 1), order1:=xlAscending, key2:=.Cells(1, 2), order2:=xlAscending,  _
Header:=xlYes
With .Columns(.Columns.Count + 1).Resize(, 3)
.Columns(1).FormulaR1C1 = "=RC3+IF(AND(RC1=R[1]C1,RC2=R[1]C2),R[1]C,0)"
.Columns(2).FormulaR1C1 = "=RC4+IF(AND(RC1=R[1]C1,RC2=R[1]C2),R[1]C,0)"
.Columns(3).FormulaR1C1 = "=RC5"
.Cells(1, 1).FormulaR1C1 = "=RC3"
.Cells(1, 2).FormulaR1C1 = "=RC4"
.Formula = .Value
End With
End With
Cells(1, 1).CurrentRegion.RemoveDuplicates Array(1, 2), xlYes
With Cells(1, 1).CurrentRegion.Columns(3).Resize(, 3)
.Copy
.Offset(0, 3).PasteSpecial xlPasteFormats
.Delete Shift:=xlToLeft
End With
End Sub
Gruß Daniel
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 12:49:26
Samantha
Wenn du noch so nett wärst und mir jeweils eine kurze Beschreibung neben die Zeile schreibst, dann könnt ich das Makro eindeutig verstehen.
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 21:52:12
Daniel
Naja ist doch fast Englisch.
Und damit quasi selbst dokumentierend.
Sort ist sortieren
RemoveDuplicates entfernt die doppelten Zeilen.
Die Formeln summieren die Werte für jede ID nach oben auf, so dass immer in der obersten Zeile einer Gruppe (welche beim Duplikate entfernen stehen bleibt) die Summe steht.
Am besten gehst du den Code im Einzelsteppmodus Zeile für Zeile durch und schaust, was im Excel-Tabelle Blatt passiert. Dann kannst du dir auch die Formeln auf deutsch anschauen.
Gruß Daniel
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 21:52:14
Daniel
Naja ist doch fast Englisch.
Und damit quasi selbst dokumentierend.
Sort ist sortieren
RemoveDuplicates entfernt die doppelten Zeilen.
Die Formeln summieren die Werte für jede ID nach oben auf, so dass immer in der obersten Zeile einer Gruppe (welche beim Duplikate entfernen stehen bleibt) die Summe steht.
Am besten gehst du den Code im Einzelsteppmodus Zeile für Zeile durch und schaust, was im Excel-Tabelle Blatt passiert. Dann kannst du dir auch die Formeln auf deutsch anschauen.
Gruß Daniel
Anzeige
AW: Zeilen addieren wenn Bedingungen erfüllt sind
25.09.2018 11:05:56
ChrisL
SUMMEWENNS berücksichtigt mehrere Kriterien

Forumthreads zu verwandten Themen

Zellen prüfen / Ausgabe wenn Bedingung erfüllt
Kay

Hallo,
Ich brauche dringend Eure Hilfe. Unter https://www.herber.de/bbs/user/54533.xls findet Ihr eine Mappe, in welcher in Spalte A
1 für "Kaufen"
0 für " "
-1 für "Verkaufen"
steht. IN SPALTE B SIND BISHER NUR MANUELL ERSTELLTE BEISPIELEINTRÄGE ENTHALTEN, DAMIT ERSICHTLIC...
12.08.2008 09:51:36
Thread-ID: 1001078
3 Beiträge
Anzeige
Unterschiedliche Werte mit Bedingung
kerberus

Hallo liebes Forum
Ich benötige mal wieder eure Hilfe. Das Ziel: eine Formel die mir die Anzahl unterschiedliche Eintragungen liefert. Folgender Code konnte ich bis jetzt erstellen:
Function ZUnterschiede(Kriterium As String, Kriteriumbereich As Range, Wertebereich As Range) _ As D...
22.08.2008 10:34:00
Thread-ID: 1003771
3 Beiträge
Zellen formatieren, wenn Bedingung NICHT erfüllt
onkelbobby

Hallo,
habe folgendes Makro um Zellen farbig zu markieren:
Sub färben() Dim loletzte As Long Dim loletzte2 As Long Dim i As Integer Dim a As Integer Worksheets(2).Activate loletzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count) loletzte2 = IIf(IsE...
02.09.2008 12:41:00
Thread-ID: 1006734
5 Beiträge
Anzeige
Summewenn und weitere Bedingungen
Marika

Hallo,
ist es möglich die Funktion Summewenn mit weiteren Bedingungen zu verknüpfen?
Zum Beispiel das auch ein Datum mit berücksichtigt werden kann.
In der folgenden Datei ist ein Beispiel hinterlegt. Die obere Tabelle soll als Basistabelle dienen und in der unteren Tabelle sollen...
26.09.2008 10:23:00
Thread-ID: 1012531
5 Beiträge
Anzeige
Werte zählen mit Bedingung
Hugo

Hallo,
in Spalte K sollen die in Spalte H aufeinderfolgenden Werte unter Bedingung gezählt werden. Habe händisch eingetragen wie gezählt werden soll. Auch ein kommentar beschreibt wie ich mir denken könnte wie es zu definieren ist. Andere Ideen sind natürlich willkommen.
Danke und Grus...
02.10.2008 18:53:00
Thread-ID: 1013949
4 Beiträge
Anzeige
Liste auswerten mit Bedingungen
Bernd

Hallo zusammen,
ich würde gerne mal wieder eine lange Excel auswerten mit verschiedenen Bedingungen. Die relevanten Datensätze, auf die die Suchbedingung zutreffen, sollten in einem Extra-Registerblatt chronologisch aufgelistet werden. Wie kann ich das Problem vorzugsweise mit Excel-Boardmi...
19.11.2008 10:01:00
Thread-ID: 1025891
6 Beiträge
Zählenwenn und Summewenn - 2 Bedingungen
Susi

Hallo liebe Excelfreunde,
in der beiliegenden Datei
https://www.herber.de/bbs/user/58105.xls
habe ich eine kleine Beispieltabelle eingefügt, in der in der Spalte F mit der Formel (=WENN(ZÄHLENWENN(B2:B8046;B2)größer*1;"";SUMMEWENN(B:B;B2;D:D))) jeweils die Summe der Spalte D gebild...
06.01.2009 10:13:45
Thread-ID: 1037162
3 Beiträge
Absolute Werte addieren mit VBA
Peter

Guten Abend
Mit der Formel
=SUMMENPRODUKT(ABS(BenannterBereich))
ermittle ich den absoluten Wert aller Zahlen im Bereich "BenannterBereich".
Leider lässt sich diese Formel in VBA mit WorksheetFunction. nicht verwenden.
Wer kennt einen alternativen Lösungsansatz?
Danke fü...
06.02.2009 21:30:35
Thread-ID: 1047925
6 Beiträge
Kriterien bei Summewenn mit 2 Bedingungen
Hendryk

Hallo,
hab eine SummeWenn-Formel mit 2 Kriterien wie folgt (als Array-Formel, finde nur das runde-Klammer-auf-nicht auf der Tastatur...) eingegeben:
=SUMME(WENN((Umsatz_Monat_actual!A1:A60000="400400");WENN(Umsatz_Monat_actual!F1:F60000="7127107-04"; Umsatz_Monat_actual!O1:O60000))...
11.03.2009 16:58:32
Thread-ID: 1059201
4 Beiträge
Summe wenn mit Bedingungen geht nicht
Andreas

Hallo,
ich habe folgendes Problem. Es existieren 2 Tabellenblätter. Auf einem der Tabellenblätter findet eine Art Auswertung statt. Das Haupttabellenblatt hat 12 benutzte Spalten, von denen ich nun Spalte B und F auf eine Übereinstimmung abprüfen will. Dazu habe ich auch ein Beispiel gefun...
25.03.2009 15:30:11
Thread-ID: 1063848
5 Beiträge
Summe wenn Bedingung erfüllt
Roger

Hallo zusammen
Ich möchte gerne in der Zelle E1 die Summe der Spalte P. Aber nur die Werte bei welche in der Spalte G in der gleichen Zeile ein "ja" steht. Die Werte in welchen in der Spalte G ein "nein" oder nichts steht, sollen nicht zusammengezählt werden. Ich könnte das mit einer zusätz...
27.04.2009 17:29:02
Thread-ID: 1071449
3 Beiträge
Summewenn mehrer Bedingungen versch. Blätter
Aquestor

Hallo zusammen,
ich habe folgendes Problem:
Ich möchte im Datenblatt Whiteboard in Zelle C11 überprüfen, ob in den Datenblättern Ma_1....Ma_18 Zelle C11 ein Wert steht. Steht in einer der 18 Zellen die überprüft werden ein Wert, so sollen Ma1!C11+Ma_2!C11+.....Ma_18!C11 summiert werden....
26.05.2009 11:23:28
Thread-ID: 1077310
9 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Zeilen addieren bei erfüllten Bedingungen in Excel

Schritt-für-Schritt-Anleitung

Um in Excel Werte zu addieren, wenn bestimmte Bedingungen erfüllt sind, kannst Du die Funktion SUMMEWENNS verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Daten vorbereiten: Stelle sicher, dass Deine Daten in einem tabellarischen Format vorliegen. Du benötigst mindestens zwei Spalten für die Bedingungen und eine Spalte für die Werte, die summiert werden sollen.

  2. Formel eingeben:

    • Gehe zu der Zelle, in der Du das Ergebnis sehen möchtest.
    • Verwende die folgende Formel: 
      =SUMMEWENNS(C:C, A:A, A1, B:B, B1)
    • Hierbei wird in Spalte C (Werte) summiert, wenn die Bedingungen in Spalte A und B erfüllt sind.

  3. Formel nach unten ziehen: Ziehe die Zelle mit der Formel nach unten, um die Berechnung für alle Zeilen durchzuführen.

  4. Duplikate entfernen: Wenn Du die Summen für die gleichen IDs hast, kannst Du die Duplikate aus der Liste entfernen, um die Endtabelle zu erstellen.

Häufige Fehler und Lösungen

  • Falsche Ergebnisse: Überprüfe, ob die Bedingungen korrekt in der Formel angegeben sind. Stelle sicher, dass Du die richtigen Spalten verwendest.

  • Duplikate nicht korrekt entfernt: Achte darauf, dass Du die Funktion „Duplikate entfernen“ im Menü „Daten“ richtig anwendest.

  • Formel ergibt #WERT!: Dies kann passieren, wenn die verwendeten Bereiche nicht die gleiche Größe haben. Achte darauf, dass die Bereiche übereinstimmen.

Alternative Methoden

  • Pivot-Tabellen: Eine Pivot-Tabelle kann einfach und schnell die gewünschten Summen berechnen, ohne die Notwendigkeit von komplexen Formeln oder Makros. Du kannst die Pivot-Tabelle so einstellen, dass sie nach ID gruppiert und die Werte summiert.

  • Makros: Wenn Du mit VBA vertraut bist, kannst Du ein Makro erstellen, das die Werte automatisch addiert, wenn die Bedingungen erfüllt sind. Hier ist ein einfaches Beispiel:

    Sub WerteAddieren()
  ' Deine VBA Logik hier
End Sub

Praktische Beispiele

Angenommen, Du hast die folgende Tabelle:

A B C D
5 2 500 30
5 2 300 20
4 1 200 66
4 2 600 78
2 5 500 52

Um die Werte in Spalte C zu addieren, wenn die IDs in Spalte A und B übereinstimmen, kannst Du die oben genannte Formel SUMMEWENNS verwenden. Das Ergebnis wäre:

A B C D
5 2 800 50
4 1 200 66
4 2 600 78
2 5 500 52

Tipps für Profis

  • Nutze die WENN-Funktion in Kombination mit SUMMEWENNS, um noch spezifischere Bedingungen zu definieren.
  • Stelle sicher, dass Du die Excel-Version verwendest, die die Funktionen unterstützt, z.B. Excel 2010 oder neuer.
  • Experimentiere mit den Filterfunktionen in Excel, um Deine Daten vor der Analyse zu visualisieren.

FAQ: Häufige Fragen

1. Wie kann ich nur addieren, wenn eine andere Zelle einen bestimmten Wert hat? Du kannst die Formel wie folgt anpassen:

=SUMMEWENNS(C:C, A:A, A1, B:B, B1, D:D, "<>0")

Dies addiert nur die Werte in Spalte C, wenn die Bedingungen in den Spalten A, B und D erfüllt sind.

2. Funktioniert das auch mit mehreren Bedingungen? Ja, die SUMMEWENNS-Funktion erlaubt es Dir, mehrere Bedingungen zu definieren. Achte darauf, dass Du für jede Bedingung den entsprechenden Bereich angibst.

3. Kann ich die Formel auch für mehrere Zellen gleichzeitig anwenden? Ja, Du kannst die Formel in eine Zelle eingeben und dann nach unten ziehen, um sie auf andere Zellen anzuwenden.

Beliebteste Forumthreads (12 Monate)

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