Guten Tag,
ich habe folgendes Makro in Excel erstellt, dass wenn ich eine Zelle mit einer Zahl markiere, es mir anzeigt, wie oft diese Zahl bereits markiert wurde.
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
Ich habe die Herausforderung, dass wenn ich eine neue Zahl mit einer Farbe makiere, muss ich im Auswertungsfeld die Formel mit Enter bestätigen, dass sich die Funktion aktualisiert.
Gibt es eine Lösung, dass sich der Wert in der Auswertungszelle automatisch aktualisiert, wenn ich eine neue Zahl markiere?
|