Hallo zusammen und SOS,
habe folgendes Problem:
Ich habe in Spalte A verschiedene und auch gleiche „Produktnummern“ stehen.
In Spalte B stehen die dazugehörigen Preise.
Wenn nun die Produktnummern gleich sind (in Spalte A) dann sollen in einer neuen Spalte die dazugehörigen Preise je Produktnummer aufaddiert werden.
Habe keine Ahnung wie ich das bewerkstelligen soll. Bin für jeden Tip dankbar.
Ich habe in Spalte A verschiedene und auch gleiche
„Produktnummern“ stehen.
In Spalte B stehen die dazugehörigen Preise.
Wenn nun die Produktnummern gleich sind (in Spalte A) dann
sollen in einer neuen Spalte die dazugehörigen Preise je
Produktnummer aufaddiert werden.
Hi Caligula,
Tabellenblattname: Tabelle1
A B C
1 a 3 3
2 a 4 7
3 b 5 5
4 c 6 6
5 c 7 13
6 c 8 21
Benutzte Formeln:
C1: =B1
C2: =WENN(A2=A1;B2+C1;B2)
C3: =WENN(A3=A2;B3+C2;B3)
C4: =WENN(A4=A3;B4+C3;B4)
C5: =WENN(A5=A4;B5+C4;B5)
C6: =WENN(A6=A5;B6+C5;B6)
Über bedingte Formatierung kannste ja die Nicht-Gasamtsummenzellen in C ausblenden via Schriftfarbe=weiß
C1:Cx markieren
Formel sit: =A1=A2
Gruß
Reinhard
Hallo Reinhard,
Habe deinen Tip soeben ausprobiert und bin sehr zufrieden was das Ergebnis betrifft.
Könnte ich, da es sich um eine sehr lange Liste handelt,den jeweils letzten Wert der Spalte A farblich unterlegen oder ähnliches?
Für deine Hilfe im voraus dankend
Jörn
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Habe deinen Tip soeben ausprobiert und bin sehr zufrieden was
das Ergebnis betrifft.
Könnte ich, da es sich um eine sehr lange Liste handelt,den
jeweils letzten Wert der Spalte A farblich unterlegen oder
ähnliches?
Für deine Hilfe im voraus dankend
Hi Jörn,
ja das geht, aber wenn du 10.000 „gefüllte“ Zeilen hast und in C ne 20stellige Formel steht hast du aschon mal eine 200 KB größere Datei.
dazu noch bedingte Formatierung, also kurz gesagt reine Excelfunktionen blähen deine Datei auf.
Eine Vba-Lösung erledigt die gleiche Aufgabe mit 20-30 Programmzeilen, eher weniger.
was möchtest du Vba oder Excel Lösung?
Gruß
Reinhard