Lọc danh sách Excel của bạn bằng macro theo cách mà nhiều mục nhập chỉ xuất hiện một lần trong danh sách đích mới và do đó làm sạch dữ liệu của bạn.
Nhiều danh sách chứa các mục trùng lặp. Đôi khi điều quan trọng là phải lọc các mục này ra khỏi danh sách. Ví dụ: bạn có thể sử dụng danh sách bán hàng để tạo danh sách trong đó mỗi khách hàng chỉ xuất hiện một lần - ví dụ: điều này có thể quan trọng đối với các phân tích thị trường.
Bảng từ hình sau cho thấy một danh sách Excel nhỏ với các số trong cột B.
Bạn muốn tạo một danh sách mới từ danh sách này, trong đó các số không còn xuất hiện hai lần nữa. Số 21, có thể được tìm thấy trong các ô B3, B5 và B14 trong danh sách ban đầu, sẽ chỉ xuất hiện một lần trong danh sách mới.
Có một số cách bạn có thể thực hiện việc này với Excel. Nếu bạn muốn sử dụng macro, bạn có thể sử dụng các lệnh VBA sau:
Danh sách phụ không có bản sao ()
Nguồn mờ theo phạm vi
Làm mờ mục tiêu dưới dạng phạm vi
Đặt nguồn = Phạm vi ("b1")
Đặt mục tiêu = Phạm vi ("d1")
Hành động Source.EntireColumn.AdvancedFilter: = xlFilterCopy, _
CriteriaRange: = Source.EntireColumn, CopyToRange: = Target, Unique: = True
Kết thúc Sub
Sau khi khởi động macro, Excel sẽ lọc bảng và hiển thị bảng mới từ ô D1. Hình sau cho thấy kết quả:
Bạn có thể thấy rằng mỗi giá trị chỉ xuất hiện một lần trong danh sách kết quả.
Sử dụng biến SOURCE để chỉ định cột trong bảng của bạn chứa dữ liệu mà từ đó bạn muốn tạo một danh sách mới mà không có các mục nhập trùng lặp. Macro luôn sử dụng toàn bộ cột thuộc tham chiếu mà bạn xác định bằng SOURCE. Sử dụng biến để xác định bất kỳ địa chỉ ô nào trong cột tương ứng.
Với biến TARGET, bạn xác định nơi Excel ghi danh sách kết quả của bạn. Danh sách mới bắt đầu ở vị trí bạn chỉ định với biến này.
Macro hoạt động với trang tính đang hoạt động cho cả vùng nguồn và vùng đích.
Để chèn macro trong bảng, hãy mở sổ làm việc tương ứng và nhấn tổ hợp phím ALT F11 trong tất cả các phiên bản Excel để khởi động trình soạn thảo VBA. Gọi lệnh INSERT - MODULE và chèn các lệnh VBA. Để bắt đầu macro từ Excel, hãy sử dụng tổ hợp phím ALT F8.
