Emily pyta:
Czy mógłbyś doradzić rozwiązanie formalne do zliczania liczby komórek, które mają określony kolor tła (tj. Te komórki zawierają pewne dane, ale kolor jest ważny, aby je policzyć).
Logicznie myślę, że powinno to być zgodne ze standardowym wzorem, tj
CountIF(A01:A55,"backgroundcolour=red")Uważam, że kolor czerwony powinien być oznaczony numerem 3 (zgodnie z plikiem pomocy)
Muszę wiedzieć, jak zakodować kolor komórki tła, tj. Wypełnienie kolorem ?, kolor tła ?, wnętrze.kolor?… ???
Emily - gdyby to było takie proste. Musisz mieć funkcję zdefiniowaną przez użytkownika w VBA. Poniżej znajduje się kod funkcji. Musisz to wprowadzić w nowym module kodu w skoroszycie.
Po wprowadzeniu kodu możesz użyć tej formuły:
=CountColor(A1:A99,D2)
Gdzie D2 ma format tła, który chcesz policzyć.
Oto kod:
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
