bin kein VBA-Kenner. Ich weiß aber, dass einige Helfer immer wieder davor warnen, Farben auszulesen. Deshalb mal eine Formellösung mit einer Hilfsspalte, die du einfach ausblenden kannst. Für die roten Markierungen habe ich ein "x", für die gelben ein "y" gesetzt.
Arbeitsblatt mit dem Namen 'Sheet1'
A
B
C
D
E
F
18
a
0,00%
2951
2964
y
19
b
2,00%
2489
2502
x
20
c
1,00%
8956
8969
21
a
0,00%
351
364
22
b
0,50%
645
658
23
24
Summe ohne rot
40934
25
Summe ohne gelb
26
Summe ohne rot und gelb
Zelle
Formel
D24
=SUMMENPRODUKT(($D$3:$D$22)*($F$3:$F$22<>"x"))
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016
ich fürchte, die Datei ist unterwegs verloren gegangen, weil Leo im falschen Forum gepostet hatte und es ja schon des Öfteren Probleme mit den Anhängen nach Verschieben gab. Schau mal, ob du sie jetzt siehst - ich habe sie nochmals eingebunden.
Gruß Günter Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen. angebl. von Georg Christoph Lichtenberg (1742-1799)
ich werde keine Zeit darauf verwenden, eine Auswertung nach Zellformaten zu entwickeln. Eine solche Vorgehensweise halte ich im höchsten Maße für unprofessionell. Füge eine Hilfsspalte mit entsprechenden Einträgen ein, dann ist alles OK.
Viele Grüße
Klaus-Dieter Der Erfolg hat viele Väter, der Misserfolg ist ein Waisenkind Richard Cobden