VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Anzahl von Zellen mit einer bestimmten Hintergrundfarbe ermitteln

Gruppe

UDF

Bereich

Format

Thema

Anzahl von Zellen mit einer bestimmten Hintergrundfarbe ermitteln

Problem

Wie kann ich die Anzahl der Zellen mit einer bestimmten Hintergrundfarbe ermitteln?

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: basMain

Function Farbe(rng As Range, iColor As Integer) As Integer
   Dim iCounter As Integer
   Dim rngAct As Range
   For Each rngAct In rng
      If rngAct.Interior.ColorIndex = iColor Then
         iCounter = iCounter + 1
      End If
   Next rngAct
   Farbe = iCounter
End Function

    


Beiträge aus dem Excel-Forum zu den Themen UDF und Format