Nhanh chóng xác định bộ lọc tự động ứng dụng (Microsoft Excel)
Jim muốn một cách nhanh chóng cho biết tiêu chí lọc nào đã được áp dụng trong Bộ lọc tự động. Anh ấy gặp khó khăn trong việc chỉ ra những cột nào đã áp dụng bộ lọc (sự thay đổi nhỏ trong màu mũi tên thả xuống từ đen sang xanh lam hầu như không đáng chú ý), vì vậy một số phương pháp khác để biết vị trí áp dụng bộ lọc sẽ rất hay.
Sự thiếu tương phản giữa các mũi tên thả xuống màu đen và xanh lam trong một cột được lọc không phải là một phàn nàn hiếm gặp. Trên thực tế, vấn đề này đã được giải quyết trong một số ExcelTips khác. (Bạn có thể tìm kiếm tại trang web ExcelTips cụm từ “màu mũi tên thả xuống” để biết mẹo hữu ích về vấn đề này.)
Nếu bạn thực sự muốn biết tiêu chí nào đang được áp dụng cho một cột, thì bạn sẽ quan tâm đến một macro nhỏ sẽ đặt tiêu chí vào một ô khác:
Function DispCriteria(Rng As Range) As String Dim Filter As String Filter = "" On Error GoTo Done With Rng.Parent.AutoFilter If Intersect(Rng, .Range) Is Nothing Then GoTo Done With .Filters(Rng.Column - .Range.Column + 1) If Not .On Then GoTo Done Filter = .Criteria1 Select Case .Operator Case xlAnd Filter = Filter & " AND " & .Criteria2 Case xlOr Filter = Filter & " OR " & .Criteria2 End Select End With End With Done: DispCriteria = Filter End Function
Đây thực sự là một hàm do người dùng xác định mà bạn có thể sử dụng trong trang tính của mình. Ví dụ: nếu bạn muốn biết các tiêu chí lọc được áp dụng cho cột C, bạn có thể sử dụng như sau trong ô:
=DispCriteria(C:C)
Nếu muốn, bạn có thể chỉ cần tham chiếu ô tiêu đề cho cột đang được lọc. Ví dụ: nếu tiêu đề (tiêu đề mà Bộ lọc tự động thêm mũi tên thả xuống) là ô C3, bạn có thể sử dụng như sau:
=DispCriteria(C3)
Các tiêu chí được hiển thị bởi chức năng là những tiêu chí thực sự được sử dụng bởi AutoFilter. Ví dụ: nếu bạn sử dụng tiêu chí lọc cho biết “Top 10”, thì Excel sẽ dịch tiêu chí đó tại thời điểm nó được áp dụng thành “> = 214.3281932” (giá trị sẽ khác nhau, tùy thuộc vào dữ liệu của bạn). Đây là bộ lọc theo công thức được trả về bởi hàm DispCriteria, không phải từ “Top 10”.
Chức năng này dựa trên một chức năng được tạo bởi Microsoft MVP Stephen Bullen.
Macro đã được xuất bản ở nhiều nơi khác nhau và bạn có thể tìm thấy nó trên trang Web của John Walkenbach, tại đây:
http://www.j-walk.com/ss/excel/usertips/tip044.htm
_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 (2891) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003.