Herbers Excel-Forum - das Archiv

Farbige Zellen zählen

Bild

Betrifft: Farbige Zellen zählen
von: Michael H.
Geschrieben am: 19.11.2003 09:35:44
Ich möchte einen Projektplan erstellen und jeden Tag bestimmte Aufgaben in einer Zeile farbig markieren. Wenn ich zum Beispiel 5 Zellen grün mache, soll mir die Formel als Ergebnis eine 5 liefern. Zeitüberschreitungen werden rot markiert und sollen auch gezählt werden.
Wer kann mir dabei helfen?

Bild

Betrifft: AW: Farbige Zellen zählen
von: Knut
Geschrieben am: 19.11.2003 09:38:42
Hallo,

Frage...?

Gruß

so nimmt man an einem Forum teil!
Bild

Betrifft: AW: Farbige Zellen zählen
von: Jens
Geschrieben am: 19.11.2003 09:58:16
Hi
was ist an der Frage "wer kann mir dabei helfen?" nicht zu verstehen?

Ich hab aus seiner Fragestellungs art rausgelesen das er möglicherweise keine Erfahrungen mit VBA hat und mit den Möglichkeiten in Excel nicht weiterkommt.
Bild

Betrifft: AW: Farbige Zellen zählen
von: Knut
Geschrieben am: 19.11.2003 10:00:17
Hallo Jens,

aber eine Anrede und ein Gruß sind doch wohl nicht zuviel verlangt, oder?

Gruß Knut
Bild

Betrifft: AW: Farbige Zellen zählen
von: Jens
Geschrieben am: 19.11.2003 10:08:03
Stimmt, die kleine Unhöfflichkeit war mir so am frühen Morgen noch garnicht aufgefallen.

Gruß Jens (hatte es auf deiner Antwort auch klatt vergessen)
Bild

Betrifft: AW: Farbige Zellen zählen
von: Jens
Geschrieben am: 19.11.2003 09:55:37
Hallo

Für das Umfärben der Zellen kann man auch Format/Bedingte Formatierung nehmen.
Wenn du es aber unbedingt selber machen willst:

Wechsel zu VBA(Alt+F11)
gehe auf Einfügen/Modul
in dieses Modul:



Function FarbeZaehlen(Referenzzelle As Range, Bereich As Range) As Long
Dim Farbe As Byte
Dim Zelle As Range
Dim Zähler As Long
Farbe = Referenzzelle.Interior.ColorIndex
Zähler = 0
For Each Zelle In Bereich
If Zelle.Interior.ColorIndex = Farbe Then Zähler = Zähler + 1
Next Zelle
FarbeZaehlen = Zähler
End Function



In Excel selbst schreibst du dann:
=FarbeZaehlen(A1;B1:B200)
A1 == ist die Zelle die die Farbe endhält die du Zählen willst
B1:B200 == ist der Bereich in dem Gezählt werden soll.

Gruß Jens
Bild

Betrifft: AW: Farbige Zellen zählen
von: Michael H.
Geschrieben am: 19.11.2003 10:21:38
Hallo,

sorry, bin das este Mal dabei. Soll nicht wieder vorkommen :-).

Habe es schon ausprobiert und es klappt wunderbar. Vielen Daannnk.

Gruß
Michael

PS: Ich hoffe, dass war jetzt so ok.
Bild

Betrifft: AW: Farbige Zellen zählen
von: Michael H.
Geschrieben am: 19.11.2003 10:33:21
Hallo Knut,

tut mir Leid, soll nicht wieder vorkommen :-)

Gruß

Michael
Bild
Excel-Beispiele zum Thema " Farbige Zellen zählen"
Nur nichtfarbige Zellen schützen Makros in Abhängigkeit vom Zellennamen aufrufen
Zellen auf Kommentar überprüfen Spalten bedingt summieren und Zellen formatieren
Text aus Textbox in Zellen aufteilen Zellen vergleichen und markieren
Zählen formatierter Zellen Daten aus Textdatei gezielt in Zellen übernehmen
Zellen verbinden und trennen Zellen bei Minuswerten schraffieren