Excel - Nhận mã màu

Bạn có thể sử dụng macro này để lấy mã màu:

 Sub distri_color ()
Tôi
Cho i = 1 đến 12
Bảng tính (1) .Range ("C" & i) .Value = Worksheet (1) .Range ("B" & i) .Interior.Color
Tiếp theo tôi
Kết thúc phụ 

• 'Thay thế 12 bằng số lượng hàng bạn muốn sử dụng.
• 'Thay thế I trong cột mà bạn muốn sử dụng cho kết quả (mã màu).
• 'Thay thế B bằng cột chứa màu bạn muốn lọc.