Anzeige
Archiv - Navigation
444to448
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
444to448
444to448
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Summieren bei bestimmter Farbe

Summieren bei bestimmter Farbe
29.06.2004 11:00:08
Dagmar
Hallo,
es wäre schön wenn mir jemand helfen könnte.
Gibt es eine Funktion für folgendes Problem:
Es sollen alle roten Zahlen in einer Spalte addiert werden.
Vielen Dank für eine schnelle Hilfe.
Gruß Dagmar

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

Betreff
Datum
Anwender
Anzeige
AW: Summieren bei bestimmter Farbe
Boris
Hi Dagmar,
wie werden die Zahlen rot? Manuell, per bedingter Formatierung oder über ein benutzerdefiniertes Format?
Grüße Boris
AW: Summieren bei bestimmter Farbe
29.06.2004 11:25:13
Dagmar
Hallo Boris,
danke für die schnelle Rückmeldung.
Die Zahlen sind ganz einfach rot formatiert (Schriftfarbe rot).
Gruß Dagmar
AW: Summieren bei bestimmter Farbe
Boris
Hi Dagmar,
Einfügen - Namen - Definieren, Name: Dagmar
Bezieht sich auf:
=ZELLE.ZUORDNEN(24;INDIREKT("ZS(-1)";))
In Spalte A ab A1 stehen deine Zahlen.
Schreibe in B1: =DAGMAR
und kopier das runter.
Als Ergebnis erhälst du die Farbnummer der Schrift in der LINKEN Nachbarzelle.
Da die Farbnummer für Rot 3 ist, kannst du dann die roten summieren mit:
=SUMMEWENN(B:B;3;A:A)
Das bloße Ändern der Schriftfarbe löst im übrigen keine Neuberechnung der Formel aus. Diese musst du z.B. mit F9 bei Bedarf selbst vornehmen.
Grüße Boris
Anzeige
AW: Summieren bei bestimmter Farbe
TGH
Hallo Dagmar
Für die Farbe Rot in Range a1 bis a100 so:
=Farbsummes(A1:A100;3)
Gruß Thommy
Du hast aber die UDF vergessen...oT
Boris
Uuups, Sorry und das in ein Modul
TGH

Function FarbsummeS(Bereich As Range, Farbe As Integer)
Dim Zelle As Object
Application.Volatile
For Each Zelle In Bereich
If Zelle.Font.ColorIndex = Farbe Then
FarbsummeS = FarbsummeS + Zelle
End If
Next
End Function

AW: Summieren bei bestimmter Farbe
Glen
Hallo Dagmar
Habe in der Recherche (Farbsumme) eingegeben und fand das hier
t387674.htm
Verweist dich auf die einwandfreie Hompage von Hajo http://home.media-n.de/ziplies/ wo auch ein Beispiel zu finden ist.
Gruss
Glen
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige