Emily vraagt:
Kunt u alstublieft de formulaire oplossing adviseren voor het tellen van het aantal cellen dat een bepaalde backgorund-kleur heeft (dwz deze cellen bevatten enkele gegevens, maar de kleur is het belangrijkste om ze te tellen).
Logischerwijs vind ik dat het een standaardformule moet volgen, dwz
CountIF(A01:A55,"backgroundcolour=red")
Ik vind dat de kleur rood moet worden geïdentificeerd door het nummer 3 (volgens het helpbestand)
Ik moet weten hoe ik de kleur van de achtergrondcel moet coderen, dwz colorfill ?, backgroundcolour ?, interior.color?… ???
Emily - als het maar zo gemakkelijk was. U moet een door de gebruiker gedefinieerde functie in VBA hebben. Hieronder staat de code voor de functie. U moet dit invoeren in een nieuwe codemodule in het werkboek.
Nadat u de code heeft ingevoerd, kunt u deze formule gebruiken:
=CountColor(A1:A99,D2)
Waar D2 het achtergrondformaat heeft dat u wilt tellen.
Hier is de code:
Function CountColor(Rng As Range, RngColor As Range) As Integer Dim Cll As Range Dim Clr As Long Clr = RngColor.Range("A1").Interior.Color For Each Cll In Rng If Cll.Interior.Color = Clr Then CountColor = CountColor + 1 End If Next Cll End Function