Tìm ô chứa đầy màu đặc biệt (Microsoft Excel)
Vanita hỏi có cách nào để chọn các ô chứa một màu cụ thể không. Hoàn thành công việc dễ dàng nếu bạn đang sử dụng Excel 2003. Chỉ cần làm theo các bước sau:
-
Nhấn Ctrl + F để hiển thị tab Tìm của hộp thoại Tìm và Thay thế. (Xem Hình 1.)
-
Đảm bảo rằng không có gì trong hộp Tìm gì.
-
Nhấp vào Định dạng. (Bạn có thể cần bấm vào Tùy chọn để xem nút Định dạng.) Excel sẽ hiển thị hộp thoại Tìm Định dạng.
-
Đảm bảo rằng tab Mẫu được hiển thị. (Xem Hình 2.)
-
Từ các màu có sẵn, chọn màu bạn muốn tìm.
-
Bấm OK để đóng hộp thoại Tìm Định dạng.
-
Nhấp vào Tìm tất cả. Hộp thoại Tìm và Thay thế mở rộng để hiển thị địa chỉ của tất cả các ô được định dạng với màu bạn đã chỉ định trong bước 5. (Xem Hình 3)
-
Bấm vào một trong các địa chỉ ô ở cuối hộp thoại. Excel chọn ô trong trang tính thực tế.
-
Nhấn Ctrl + A. Tất cả các địa chỉ trong hộp thoại đều được chọn.
-
Nhấp vào Đóng. Tất cả các ô có màu mong muốn được chọn.
Nếu bạn đang sử dụng Excel 97, Excel 2000 hoặc Excel 2002, cách duy nhất để chọn các ô có màu cụ thể là sử dụng macro. Hãy xem xét macro được hiển thị ở đây:
Sub SelectColoredCells() Dim rCell As Range Dim lColor As Long Dim rColored As Range 'Select the color by name (8 possible) 'vbBlack, vbBlue, vbGreen, vbCyan, 'vbRed, vbMagenta, vbYellow, vbWhite lColor = vbBlue 'If you prefer, you can use the RGB function 'to specify a color 'lColor = RGB(0, 0, 255) Set rColored = Nothing For Each rCell In Selection If rCell.Interior.Color = lColor Then If rColored Is Nothing Then Set rColored = rCell Else Set rColored = Union(rColored, rCell) End If End If Next If rColored Is Nothing Then MsgBox "No cells match the color" Else rColored.Select MsgBox "Selected cells match the color:" & _ vbCrLf & rColored.Address End If Set rCell = Nothing Set rColored = Nothing End Sub
Để sử dụng macro, hãy chọn một dải ô trước khi chạy nó. Sau đó macro bước qua từng ô đã chọn và so sánh màu của nó với bất kỳ màu nào bạn chỉ định trong lColor. Nếu tìm thấy một kết quả phù hợp, thì ô sẽ được thêm vào một tập hợp lựa chọn. Khi hoàn thành, macro chỉ chọn các ô phù hợp đó rồi thoát.
Nếu muốn tìm hiểu các giải pháp dựa trên macro khác, bạn có thể tham khảo bài viết sau tại Cơ sở kiến thức Microsoft:
http://support.microsoft.com/kb/142122
_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 (2396) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: