Đếm màu ô sử dụng VBA trong Microsoft Excel
?Code VBA hàm đếm màu ô ⬇
Function CountByColor(DefinedColorRange As Range, CountRange As Range)
Application.Volatile
‘Declaring variables
Dim ICol As Integer
Dim GCell As Range
‘Getting the interior color of the cell
ICol = DefinedColorRange.Interior.ColorIndex
‘Looping through the defined range
For Each GCell In CountRange
If ICol = GCell.Interior.ColorIndex Then
‘Getting the count of matching colored cell
CountByColor = CountByColor + 1
End If
Next GCell
End Function
?DienDan.Edu.Vn cám ơn bạn đã quan tâm và rất vui vì bài viết đã đem lại thông tin hữu ích cho bạn. https://diendan.edu.vn/
DienDan.Edu.Vn Cám ơn bạn đã quan tâm và rất vui vì bài viết đã đem lại thông tin hữu ích cho bạn.DienDan.Edu.Vn! là một website với tiêu chí chia sẻ thông tin,... Bạn có thể nhận xét, bổ sung hay yêu cầu hướng dẫn liên quan đến bài viết. Vậy nên đề nghị các bạn cũng không quảng cáo trong comment này ngoại trừ trong chính phần tên của bạn.Cám ơn.
