Làm thế nào để xác định và xác định chỉ số màu nền của ô trong Excel?
Khi bạn nhận được một trang tính có nhiều ô đầy màu sắc như ảnh chụp màn hình bên dưới, trong một số trường hợp, bạn có thể muốn xác định chỉ số màu nền của các ô màu này. Không có tính năng tích hợp nào có thể xác định chỉ số màu của ô, nhưng trong bài viết này, tôi giới thiệu một số mã VBA để giải quyết công việc này trong Excel một cách nhanh chóng.
Xác định màu của ô bằng VBA
Thực hiện như các bước sau để xác định màu của ô bằng VBA.
1. nhấn Alt + F11 các phím để kích hoạt Microsoft Visual Basic cho ứng dụng cửa sổ.
2. nhấp chuột Chèn > Mô-đun để mở một cái mới Mô-đun và dán mã VBA bên dưới vào tập lệnh trống. Xem ảnh chụp màn hình:
VBA: Nhận mã hex truyền thống của ô
Function getRGB1(FCell As Range) As String
'UpdatebyExtendoffice20170714
Dim xColor As String
xColor = CStr(FCell.Interior.Color)
xColor = Right("000000" & Hex(xColor), 6)
getRGB1 = Right(xColor, 2) & Mid(xColor, 3, 2) & Left(xColor, 2)
End Function
3. Lưu mã và đóng cửa sổ VBA. Chọn một ô trống bên cạnh ô màu, nhập công thức này, = getRGB1 (A16), sau đó kéo tay cầm tự động điền qua các ô bạn muốn sử dụng. Xem ảnh chụp màn hình:
Mẹo: có một số mã khác có thể xác định chỉ số màu của ô.
1. VBA: Giá trị thập phân cho mỗi mã
Function getRGB2(FCell As Range) As String
'UpdatebyExtendoffice20170714
Dim xColor As Long
Dim R As Long, G As Long, B As Long
xColor = FCell.Interior.Color
R = xColor Mod 256
G = (xColor \ 256) Mod 256
B = (xColor \ 65536) Mod 256
getRGB2 = "R=" & R & ", G=" & G & ", B=" & B
End Function
Kết quả:
2. VBA: Giá trị thập phân
Function getRGB3(FCell As Range, Optional Opt As Integer = 0) As Long
'UpdatebyExtendoffice20170714
Dim xColor As Long
Dim R As Long, G As Long, B As Long
xColor = FCell.Interior.Color
R = xColor Mod 256
G = (xColor \ 256) Mod 256
B = (xColor \ 65536) Mod 256
Select Case Opt
Case 1
getRGB3 = R
Case 2
getRGB3 = G
Case 3
getRGB3 = B
Case Else
getRGB3 = xColor
End Select
End Function
Kết quả:
nhanh chóng chọn các giá trị trùng lặp hoặc duy nhất trong một phạm vi Excel |
Trong trang tính Excel, nếu bạn có một phạm vi bao gồm một số hàng trùng lặp, bạn có thể cần chọn chúng hoặc đánh dấu chúng, nhưng làm cách nào để có thể giải quyết nhanh công việc này? Nếu bạn có Kutools cho Excel, bạn có thể dùng Chọn Sao y & Tế bào duy nhất tiện ích để nhanh chóng chọn các giá trị trùng lặp hoặc giá trị duy nhất trong phạm vi hoặc tô màu nền và phông chữ cho các giá trị trùng lặp và duy nhất. Nhấp để dùng thử miễn phí 30 ngày! |
Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. |
Các bài báo tương đối:
- Làm cách nào để thay đổi màu phông chữ dựa trên giá trị ô trong Excel?
- Làm cách nào để tô màu các giá trị trùng lặp hoặc các hàng trùng lặp trong Excel?
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!