ZÄHLENWENNS mit Formaten

nirheobo · 8. Februar 2019

Guten Tag,

ist es möglich, mit der Funktion ZÄHLENWENNS nicht nur die Anzahl der Zellen mit definierten Werten,

sondern auch Anzahl der Zellen mit definierten Zellformaten zu zählen,

und wenn, wie muss das Format eingeben?

Beispielweise, wenn ich die Anzahl farbiger Zellen in einem Bereich zählen möchte.

Grüße, Michael

Claus Busch

Hallo,

probiere mal folgende Funktion:

Function FarbAnz(Bereich As Range, Farbe As Range, _

   Optional Schrift As Boolean)
Dim rngC As Range

Dim ZF As Long
If Schrift = True Then

   ZF = Farbe.Font.Color

   For Each rngC In Bereich

      If rngC.Font.Color = ZF Then

         FarbAnz = FarbAnz + 1

      End If

   Next

Else

   ZF = Farbe.Interior.Color

   For Each rngC In Bereich

      If rngC.Interior.Color = ZF Then

         FarbAnz = FarbAnz + 1

      End If

   Next

End If

End Function

Zum Zählen der Zellen mit Hintergrundfarbe rufe die Funktion z.B. so im Blatt auf:

=FarbAnz(A1:E1;$A$3)

Dabei ist A1:E1 der Bereich, in dem gezählt werden soll und A3 ist eine Zelle mit der gewünschten Hintergrundfarbe.

Wenn du Zellen nach Schriftfarbe zählen möchtest, dann rufe die Funktion z.B. so auf:

=FarbAnz(A4:E4;$A$1;1)

Die ersten beiden Argumente entsprechen obigem Beispiel. Die 1 als letztes Argument sagt, dass hier die Schriftfarbe gezählt werden soll.

Claus

Claus Busch

Hallo Michael,

wenn du die Zellen mit der bedingten Formatierung eingefärbt hast, kannst du diese Bedingung als Kriterium bei ZÄHLENWENN verwenden.

Sind die Zellen von Hand eingefärbt, musst du VBA zum Auswerten verwenden.

Wenn du weitere Hilfe benötigst, ist eine genaue Beschreibung deines Tabellenlayout, den Werten und den Formaten notwendig. Sinnvoll wäre dann eine Demo-Mappe zur Verfügung zu stellen.

Claus

nirheobo

Hallo Claus,

vielen Dank für die Antwort!

In meinem Fall ist die Zellfarbe von Hand festgelegt.

Wenn es dafür eine VBA-Lösung gibt, wäre ich dankbar dafür, hatte das schon versucht, aber ohne Erfolg.

Ich kann leider nicht erkennen, wie ich hier eine Datei hochladen kann.

Habe mal einen Tabellenausschnitt eingefügt und das Bild der Tabelle.

Formate sind Exponentialzahl bzw. normales Zahlenformat.

Viele Grüße

Michael

[table][tr][td]# rote Zellen[/td][td]A[/td][td]B[/td][td]C[/td][td]D[/td][td]E[/td][/tr][tr][td]0[/td][td]1****0E-02[/td][td]1****16[/td][/tr][/table]

nirheobo

Hallo Claus,

ich war zwischendurch im Urlaub ohne Netz, deshalb verspätet ein herzliches Dankeschön:

die Funktion funktioniert.

Viele Grüße

Michael

Claus Busch

Hallo Jana,

markiere deine Tabelle ab A2 => Bedingte Formatierung => Neue Regel => Formel zur Ermittlung....:

=ZÄHLENWENN(A2:A1000;A2)=ZÄHLENWENNS(A2:A1000;A2;B2:B1000;10000)

und weise das gewünschte Format zu.

Claus

Hi,

willkommen im Windows Forum!

ZÄHLENWENNS mit Formaten - Similar Threads - ZÄHLENWENNS Formaten	Forum	Datum
Probleme beim zählen mit ZÄHLENWENNS bei mehr als einem Kriterium Probleme beim zählen mit ZÄHLENWENNS bei mehr als einem Kriterium: Hallo zusammen,ich hoffe, ich bin hier richtig und man kann mir helfen. Seit fast einer Woche versuche ich ein eigentlich nur kleines Problem zu lösen, doch irgendwie stehe ich total auf dem...	Microsoft Office	20. August 2023
Funktion "Zählenwenn" mit Bedingungen Funktion "Zählenwenn" mit Bedingungen: Hallo ,ich möchte gerne in einer Tabelle mit der Funktion "zählenwenn" die Anzahl diverser Zahlen zählen. Die Zählung der Spalte A soll aber nur durchgeführt werden, wenn diverse Zellen Spalte B...	Microsoft Office	28. Mai 2023
Zählenwenn Fehler Zählenwenn Fehler: Guten Tag, ich habe Probleme bei Excel mit der Funktion "Zählenwenn" bei der Formeleingabe kommt eine Fehlermeldung obwohl ich die Formel richtig eingebe zB: =ZÄHLENWENNF:F."a" Habe es auch schon...	Microsoft Office	16. Mai 2023
Zählenwenn Zählenwenn: Ich möchte dass die Zählenwenn Funktion die Zellen von b1 bis b5 abzählt, die größer als die zahl sind, die in d2 steht. Wie kann ich das machen, bzw. gibt es eine andere Funktion, die das kann?...	Microsoft Office	13. April 2023
Zählenwenn Suchkriterien Zählenwenn Suchkriterien: Hallo zusammen,Ich habe eine Frage bzgl. der Zählen wenn Funktion.Und zwar würde ich gerne zwei Suchkriterien auf einmal bedienen.Bis Lang sieht es so...	Microsoft Office	6. März 2023
Zählenwenn zwei spalten in einer Tabelle das gleiche Datum haben Zählenwenn zwei spalten in einer Tabelle das gleiche Datum haben: Hallo zusammen,ich stehe vor einem Problem, was ich eigentlich lösen könnte, aber die Formel die ich verwende gibt mir nicht die Zahl zurück die ich erwartet habe.Folgendes Beispiel:ABDatum 1Datum...	Microsoft Office	3. März 2023
ZÄHLENWENNS rechnet bei leeren Zellen falsch ZÄHLENWENNS rechnet bei leeren Zellen falsch: Hallo,wie im Betreff beschrieben, ignoriert ZÄHLENWENNS leere Zellen, obwohl in der Hilfe zur Funktion steht, dass wenn das Kriterium ein Bezug auf eine leere Zelle ist, der Wert 0 als Kriterium...	Microsoft Office	20. Februar 2023

ZÄHLENWENNS mit Formaten