Zellenfarben zählen (Microsoft Excel)
Neben der Verwendung von Werten und Text in Ihren Arbeitsblättern können Sie in Excel Farben verwenden, um Ihre Daten entweder zu beleben oder ihnen eine Bedeutung zu verleihen. Wenn Sie in Ihren Arbeitsblättern Farben verwenden, fragen Sie sich möglicherweise, ob es eine Möglichkeit gibt, die Anzahl der Zellen zu zählen, die mit einer bestimmten Füllfarbe formatiert sind. In Excel gibt es keine intrinsische Funktion, um eine solche Aufgabe auszuführen, aber Sie können sicherlich eine mit einer benutzerdefinierten Funktion erstellen. Das folgende Beispiel zeigt die Anzahl der Zellen in einem Bereich, die mit einer gelben Füllfarbe formatiert sind:
Function CountYellow(MyRange As Range) Dim iCount As Integer Application.Volatile iCount = 0 For Each cell In MyRange If cell.Interior.ColorIndex = 6 Then iCount = iCount + 1 End If Next cell CountYellow = iCount End Function
Um die Funktion zu verwenden, müssen Sie lediglich eine Formel wie die folgende in einer Zelle Ihres Arbeitsblatts verwenden:
=CountYellow(A1:A99)
In diesem Beispiel wird die Anzahl der Zellen im Bereich von A1: A99 zurückgegeben, die die gelbe Füllfarbe verwenden.
Beachten Sie in der CountYellow-Funktion, dass die Zellen untersucht werden, um festzustellen, ob die ColorIndex-Eigenschaft gleich 6 ist. In anderen VBA-Codierungen sind Sie möglicherweise daran gewöhnt, nahezu englische Konstanten zu sehen, die Farben definieren. In diesem Fall funktionieren die normalen Farbkonstanten nicht. Stattdessen arbeitet die ColorIndex-Eigenschaft basierend auf einer Reihe von Indexwerten in einer bestimmten Farbpalette. Wenn Sie die verschiedenen Indexwerte sehen möchten, die für die verschiedenen Farben verwendet werden, lesen Sie die VBA-Online-Hilfedatei für die ColorIndex-Eigenschaft.
Sobald Sie wissen, wie Sie auf diese Weise in einem Bereich durch die Zellen gehen, können Sie auf einfache Weise andere Arten von Vorgängen ausführen, die auf der Farbe basieren, mit der die Zellen im Bereich gefüllt werden. Anstatt einfach die Anzahl der Zellen zu zählen, können Sie beispielsweise die Werte der Zellen im Bereich addieren oder den Durchschnitt der Werte im Bereich ermitteln. Alles, was Sie tun müssen, ist, die entsprechenden Änderungen im Code in der innersten If … End If-Struktur vorzunehmen.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (1978) gilt für Microsoft Excel 97, 2000, 2002 und 2003.