Microsoft Excel

Herbers Excel/VBA-Archiv

Zählen von Zellen mit einer bestimmten Farbe

Betrifft: Zählen von Zellen mit einer bestimmten Farbe von: Erik
Geschrieben am: 23.09.2020 14:52:06

Hallochen,

ich möchte in einer Tabelle Zellen mit einer bestimmten Farbe zählen. Dazu habe ich die Funktion CountCcolor eingebunden. Das funktioniert hervorragend. Nun möchte ich die Funktion aber so erweitern, dass nur sichtbare Zellen gezählt werden. Habt Ihr da eine Idee für mich?

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


Betrifft: AW: Zählen von Zellen mit einer bestimmten Farbe
von: Hajo_Zi
Geschrieben am: 23.09.2020 15:04:24

prüfe die Zeilenhöhe>0

GrußformelHomepage

Betrifft: AW: Zählen von Zellen mit einer bestimmten Farbe
von: Erik
Geschrieben am: 28.09.2020 12:05:07

hättest du ein Beispiel für mich? Ich bekomm es nicht hin.

Betrifft: AW: Zählen von Zellen mit einer bestimmten Farbe
von: Hajo_Zi
Geschrieben am: 28.09.2020 15:24:46

    If Rows("17:17").RowHeight > 0 Then

Gruß Hajo

Beiträge aus dem Excel-Forum zum Thema "Zählen von Zellen mit einer bestimmten Farbe"