Bên cạnh việc sử dụng các giá trị và văn bản trong trang tính của bạn, Excel cho phép bạn sử dụng màu sắc để làm sống động hoặc cung cấp ý nghĩa cho dữ liệu của bạn. Nếu bạn sử dụng màu trong trang tính của mình, bạn có thể tự hỏi liệu có cách nào để đếm số ô được định dạng bằng một màu tô cụ thể hay không. Không có hàm nội tại nào trong Excel để thực hiện một tác vụ như vậy, nhưng bạn chắc chắn có thể tạo một hàm với hàm do người dùng xác định. Sau đây là ví dụ về một ví dụ sẽ đếm số lượng ô trong một dải ô được định dạng với màu tô màu vàng:

Function CountYellow(MyRange As Range)

Dim iCount As Integer     Application.Volatile     iCount = 0     For Each cell In MyRange         If cell.Interior.ColorIndex = 6 Then             iCount = iCount + 1         End If     Next cell     CountYellow = iCount End Function

Để sử dụng hàm, tất cả những gì bạn cần làm là sử dụng công thức như sau trong một ô của trang tính của bạn:

=CountYellow(A1:A99)

Ví dụ này trả về số ô trong phạm vi A1: A99 sử dụng màu tô màu vàng.

Lưu ý trong hàm CountYellow rằng các ô được kiểm tra để xem thuộc tính ColorIndex có bằng 6. Trong mã hóa VBA khác, bạn có thể quen nhìn thấy các hằng số gần giống tiếng Anh xác định màu sắc hay không. Trong trường hợp này, các hằng số màu bình thường không hoạt động. Thay vào đó, thuộc tính ColorIndex hoạt động dựa trên một tập hợp các giá trị chỉ mục vào một bảng màu cụ thể. Nếu bạn muốn xem các giá trị chỉ mục khác nhau được sử dụng cho các màu khác nhau, hãy xem tệp trợ giúp trực tuyến VBA cho thuộc tính ColorIndex.

Khi bạn biết cách đi qua các ô trong phạm vi theo cách này, bạn sẽ dễ dàng thực hiện các loại thao tác khác dựa trên màu được sử dụng để tô các ô trong phạm vi. Ví dụ: thay vì chỉ đơn giản đếm số lượng ô, bạn có thể cộng các giá trị của các ô trong phạm vi hoặc bạn có thể tìm giá trị trung bình của các giá trị trong phạm vi. Tất cả những gì bạn cần làm là thực hiện các thay đổi thích hợp trong mã trong cấu trúc If …​ End If trong cùng.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (1978) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003.