Excel Farbige Zellen zählen ohne Hilfsspalte

In diesem Fenster gebt ihr unter "Name" eine passende Bezeichnung ein, z. B. "Farben". Der voreingestellte Bereich Arbeitsmappe muss so bleiben, ein Kommentar ist nicht nötig.

In diesem Fall wollen wir ja die Hintergrundfarbe zählen, also kommt in das Feld "Bezieht sich auf" folgende Formel:

=ZELLE.ZUORDNEN(63;INDIREKT("ZS(1)";))

Die Erklärung hierzu: 

Die Zahl 63 besagt, dass ihr die Hintergrundfarbe bestimmen möchtet; wollt ihr anstatt dessen die Schriftfarbe zählen, tauscht ihr diese Zahl durch "24" aus. 

Das "ZS(1)" steht für die Hilfsspalte (mehr zur Hilfsspalte im nächsten Schritt). "1" definiert die Spalte links neben den zu zählenden Zellen, "-1" wäre rechts davon und "0" wäre die Spalte selbst.

Wenn ihr anstatt Spalten Zeilen zählen möchtet, verändert ihr die Formel in "INDIREKT("Z(1)S";).

Weiter zum Hauptinhalt

Dieser Browser wird nicht mehr unterstützt.

Führen Sie ein Upgrade auf Microsoft Edge durch, um die neuesten Features, Sicherheitsupdates und den technischen Support zu nutzen.

Zählen der Anzahl von Zellen mit einer bestimmten Zellenfarbe mithilfe von VBA

• Artikel
• 09/27/2022
• 3 Minuten Lesedauer
• Gilt für::Excel for Office 365, Excel 2019, Excel 2016, Excel 2013, Excel 2010, Microsoft Office Excel 2007, Microsoft Office Excel 2003

In diesem Artikel

Zusammenfassung

Auf der Registerkarte "Microsoft Excel-Formeln " wissen wir, dass in der Kategorie " Weitere Funktionen>statistisch" eine Funktion namens ZÄHLENWENN vorhanden ist, die die Anzahl der Zellen innerhalb eines Bereichs zählt, die eine bestimmte Bedingung erfüllen. Kriterien für diese Funktion sind auf Text oder Zahlen beschränkt. Mit VBA können wir jedoch eine Funktion erstellen, um die Anzahl der Zellen mit anderen Kriterien zu zählen, z. B. die Zellenfarbe.

Weitere Informationen

Mit VBA kann eine benutzerdefinierte Funktion (User Defined Function, UDF) erstellt und in einer Add-In-Datei gespeichert werden, sodass sie in anderen Arbeitsmappen verwendet und auf andere Computer übertragen werden kann.

Erstellen einer UDF

Hier sind die Schritte zum Erstellen eines UDF zum Zählen der Zellenfarbe:

1. Öffnen Sie Microsoft Excel, und drücken Sie dann ALT+F11, um das VBE-Fenster (Visual Basic Editor) anzuzeigen.

2. Wählen Sie im Menü "Einfügen" die Option "Modul " aus, um ein Modul zu erstellen. Geben Sie dann das folgende Skript ein:

   Function CountCcolor(range_data As range, criteria As range) As Long     Dim datax As range     Dim xcolor As Long xcolor = criteria.Interior.ColorIndex For Each datax In range_data     If datax.Interior.ColorIndex = xcolor Then         CountCcolor = CountCcolor + 1     End If Next datax End Function
   

   

3. Schließen Sie das VBE-Fenster, um zu Excel zurückzukehren.

4. Um die UDF zu testen, erstellen Sie Beispieldaten, die eine Spalte mit Zellen in verschiedenen Farben enthalten.

5. Schreiben Sie in Zelle D3 die folgende Funktion:

=CountCcolor(range_data,criteria)

• Wählen Sie im Argument "range_data" die Zelle C2 bis C51 aus.

• Wählen Sie im Argument "Kriterien" zelle F1 aus.

1. Drücken Sie EINGABE. Das Ergebnis in Zelle F2 ist 6. Dies bedeutet, dass die Anzahl der blau schattierten Zellen 6 beträgt.

2. Sie können testen, indem Sie andere Farben verwenden. Ändern Sie die Farbe in Zelle F1 mit einer beliebigen Farbe aus den Daten, indem Sie " Startfüllfarbe>" verwenden.

3. Sie können die UDF auch zippen, damit die Funktion in einer anderen Arbeitsmappe oder auf einem anderen Computer verwendet werden kann. Führen Sie hierfür die folgenden Schritte aus:

   Schritt 1: Speichern der Arbeitsmappe

   a. Wählen Sie "Datei" und dann "Speichern unter" aus. (Wählen Sie bei Bedarf "Durchsuchen " aus.)

   b. Wählen Sie Excel Add-In (XLAM) als Format aus, und geben Sie der Datei einen Namen, z. B. CountCcolor.

   Hinweis

   Sie können Ihre Add-In Datei an beliebiger Stelle speichern. Damit es jedoch als Add-In in Ihrem Excel-Programm aufgeführt wird, speichern Sie es am Standardspeicherort. In Windows 7 lautet der Standardspeicherort für jede Version von Microsoft Excel: C:\Users\RADDINI\AppData\Roaming\Microsoft\AddIns

   Schritt 2: Installieren des Add-Ins

   a. Öffnen Sie Microsoft Excel auf dem Computer, auf dem Sie das Add-In installieren möchten.

   b. Öffnen Sie das Dialogfeld Add-Ins, indem Sie excel-Add-Ins für Excel 2013 und höher auf der Registerkarte "Entwicklertools " auswählen. (Add-Ins in Excel 2010.)

   c. Wählen Sie im Dialogfeld "Add-Ins " die Option " Durchsuchen" aus.

   d. Wechseln Sie zu dem Dateispeicherort, an dem die Add-In Datei gespeichert ist (z. B. ein USB-Laufwerk oder ein cloudbasierter Ordner). Wählen Sie die Datei und dann "Öffnen" aus.

   e. Stellen Sie im Dialogfeld Add-Ins sicher, dass das Add-In-Kontrollkästchen deaktiviert ist. Wählen Sie dann OK aus.

Die Count Cell Color UDF ist installiert und einsatzbereit. Sie können jederzeit auf diese Funktion zugreifen, indem Sie den Cursor in eine beliebige Zelle des Arbeitsblatts setzen und Folgendes eingeben:

=CountCcolor(range_data,criteria)

Haftungsausschluss für Inhalte von Community-Lösungen

DIE MICROSOFT CORPORATION UND/ODER IHRE JEWEILIGEN LIEFERANTEN MACHEN KEINE ANGABEN ZUR EIGNUNG, ZUVERLÄSSIGKEIT ODER GENAUIGKEIT DER HIERIN ENTHALTENEN INFORMATIONEN UND ZUGEHÖRIGEN GRAFIKEN. ALLE DIESE INFORMATIONEN UND ZUGEHÖRIGEN GRAFIKEN WERDEN OHNE JEGLICHE GARANTIE BEREITGESTELLT. MICROSOFT UND/ODER SEINE JEWEILIGEN LIEFERANTEN SCHLIEßEN HIERMIT ALLE GARANTIEN UND BEDINGUNGEN IN BEZUG AUF DIESE INFORMATIONEN UND DAMIT VERBUNDENEN GRAFIKEN AB, EINSCHLIEßLICH ALLER IMPLIZIERTEN GARANTIEN UND BEDINGUNGEN DER HANDELSÜBLICHKEIT, EIGNUNG FÜR EINEN BESTIMMTEN ZWECK, GESCHÄFTLICHER AUFWAND, TITEL UND NICHTVERLETZUNG VON RECHTEN. SIE ERKLÄREN SICH AUSDRÜCKLICH DAMIT EINVERSTANDEN, DASS MICROSOFT UND/ODER SEINE LIEFERANTEN IN KEINEM FALL FÜR DIREKTE, INDIREKTE, STRAF-, ZUFÄLLIGE, BESONDERE, FOLGESCHÄDEN ODER SCHÄDEN JEGLICHER ART HAFTBAR GEMACHT WERDEN, EINSCHLIEßLICH, ABER NICHT BESCHRÄNKT AUF SCHÄDEN FÜR DEN VERLUST DER NUTZUNG, DATEN ODER GEWINNE, DIE SICH AUS DER VERWENDUNG ODER IN IRGENDEINER WEISE ERGEBEN, DIE MIT DER VERWENDUNG DER HIERIN ENTHALTENEN INFORMATIONEN UND ZUGEHÖRIGEN GRAFIKEN VERBUNDEN IST, OB VERTRAGS-, DELIKTS-, FAHRLÄSSIGKEITS-, HAFTUNGS- ODER SONSTIGE HAFTUNG, AUCH WENN MICROSOFT ODER EINER SEINER LIEFERANTEN AUF DIE MÖGLICHKEIT VON SCHÄDEN HINGEWIESEN WURDE.

Zusätzliche Ressourcen

Zusätzliche Ressourcen

In diesem Artikel

Kann man in Excel farbige Zellen Zahlen?

Wie zähle und Summiere Ich Zellen anhand der Hintergrundfarbe in Excel?

Wo finde ich den Farbcode in Excel?

Wie kann ich bei Excel Zellen Zahlen?