ich bin dabei eine klein Funktion zu bauen via VBA.
in einem definierten Range, sollte alle Zellen die die Hintergrundfarbe Rot haben gezählt werden.
Dies klappt auch mit folgender funktion:
in Excelsheet habe ich folgende Formel gemacht um den gezählten Wert zu zeigen:
=zähleFarbe(a1:a10;3)
____
Function ZähleFarbe(Bereich As Range, Farbe As Integer)
Dim zelle As Range
Application.Volatile
For Each zelle In Range("a1:a10")
If zelle.Interior.ColorIndex = 3 Then
ZähleFarbe = ZähleFarbe + 1
End If
Next zelle
End Function
____
wie muss ich aber diese Funktion ändern / ergänzen, wenn ich gerne weitere Farben auch zählen möchte. ?
ich Habe z.B. auch Zellen mit gelb und blau die ich auch gerne zählen würde.
Danke im Vorraus für Eure unterstützung.
Uli