Giúp đỡ về cách đếm dữ liệu theo 2 điều kiện: ký tự và màu nền

[lamxung1992]

Xin chào các bạn!
Các bạn cho mình hỏi, có cách nào đếm dữ liệu theo 2 điều kiện: ký tự ô và màu nền (VD: Đếm các ô ký tự A2, màu nền vàng, ...) như file excel mình đính kèm.
Mong nhận được sự giúp đỡ từ các bạn!...

 

[befaint]

Lúc lập bảng dữ liệu sao mình không lập cấu trúc theo dạng chuẩn ấy. Giờ dò dò theo màu nữa mệt lắm.

 

[xuongrongdat]

Xin chào các bạn!
Các bạn cho mình hỏi, có cách nào đếm dữ liệu theo 2 điều kiện: ký tự ô và màu nền (VD: Đếm các ô ký tự A2, màu nền vàng, ...) như file excel mình đính kèm.
Mong nhận được sự giúp đỡ từ các bạn!...

Bài của bạn mình thua, hihi.

Lúc lập bảng dữ liệu sao mình không lập cấu trúc theo dạng chuẩn ấy. Giờ dò dò theo màu nữa mệt lắm.

Bài này dùng VBA mới giải quyết được hả bác?
Đôi khi con cũng có nhu cầu này nè mà không biết làm sao?!

 

[snow25]

Xin chào các bạn!
Các bạn cho mình hỏi, có cách nào đếm dữ liệu theo 2 điều kiện: ký tự ô và màu nền (VD: Đếm các ô ký tự A2, màu nền vàng, ...) như file excel mình đính kèm.
Mong nhận được sự giúp đỡ từ các bạn!...

Thử cái này xem.

Function dem(ByVal mang As Range, ByVal dk As Range) As Long
      Dim T As Range
      For Each T In mang
          If T.Value = dk.Value Then
             If T.Interior.ColorIndex = dk.Interior.ColorIndex Then
                dem = dem + 1
             End If
          End If
      Next
End Function

=dem($A$1:$F$4,A9)

 

[bomberman211]

Bài này dùng VBA mới giải quyết được hả bác?

Đúng rồi, hiện tại Excel chưa có hàm có sẵn để nào nhận diện màu sắc hết.

 

[Binbo2020]

Đúng rồi, hiện tại Excel chưa có hàm có sẵn để nào nhận diện màu sắc hết.

Hàm ẩn Get.cell có phân biệt được mã màu nền mà, nhưng chỉ cho một ô không cho vùng được thì phải, dùng nghịch cho vui thì được

 

[huhumalu]

Hàm ẩn Get.cell có phân biệt được mã màu nền mà, nhưng chỉ cho một ô không cho vùng được thì phải, dùng nghịch cho vui thì được

Cái Cell chỉ trả về có hay không có tô mầu thôi.

"color"

The value 1 if the cell is formatted in color for negative values; otherwise returns 0 (zero). Note: This value is not supported in Excel for the web, Excel Mobile, and Excel Starter.

 

[Binbo2020]

Mình nói nhận diện mã màu nền bằng get.cell mà có nói hàm cell đâu

 

[VetMini]

Get.Cell(63, ...) cho biết màu của ô.
Tuy nhiên, màu không phải là dữ liệu. Sử dụng tin tức từ màu để làm việc sẽ vướng hai điều nguy hiểm:
1. hàm trên không tính lại nếu cell thay màu. Chỉ tính lại khi recalculate.
2. màu nền là khái niệm cổ đại. Kể từ 2007 là đã có theme. Và màu nền sẽ hoàn toàn té ngữa nếu theme thay đổi.

(get.cell là hàm macro4. Tự tìm hiểu những điểm lợi và hại khác của macro4)

 

[lamxung1992]

Thử cái này xem.

Function dem(ByVal mang As Range, ByVal dk As Range) As Long
      Dim T As Range
      For Each T In mang
          If T.Value = dk.Value Then
             If T.Interior.ColorIndex = dk.Interior.ColorIndex Then
                dem = dem + 1
             End If
          End If
      Next
End Function

=dem($A$1:$F$4,A9)

Cái này đúng ý mình rồi, mình cảm ơn nhé, nhưng có điều khi mình thay đổi màu nền thì kết quả không thay đổi theo, bác có cách nào xử lý không