VBA - Đếm số lượng ô màu

Vấn đề

Tôi đang tìm mã VBA theo đó chúng ta có thể xác định chỉ mục của ô cuối cùng (màu được xác định trước) trong một cột cột.

Ví dụ: Cột chứa các ô màu lên đến dòng 650, làm thế nào để có được 650 này?

Dung dịch

Đây là một mã nhỏ cho mục đích này:

 Subcolor_count () 'cho thử nghiệm, chúng tôi sẽ sử dụng nền màu vàng = 6 sur 20 ligne', dòng cuối cùng là không 30 a = Range ("A1"). 6) s = ms Trong Plage If C.Interior.ColorIndex = Color Then X = C.Row End If Next CountColor_bacgroung = X Chức năng kết thúc 

Cảm ơn Bidouilleu_R cho mẹo này.