[Giúp đỡ] Xóa dữ liệu trùng mảng hai chiều (1 người xem)

[NguyenNgocSon]

Em có mảng 2 chiều sau:
(12,23);(12,23);(24,35);(10,30);(24,35)
Em muốn nhờ code VBA xóa phần tử trùng
Kết quả: (12,23);(24,35);(10,30)
Trân trọng cám ơn !

 

[ndu96081631]

Em có mảng 2 chiều sau:
(12,23);(12,23);(24,35);(10,30);(24,35)
Em muốn nhờ code VBA xóa phần tử trùng
Kết quả: (12,23);(24,35);(10,30)
Trân trọng cám ơn !

Dùng Dictionary, trên GPE có đầy rồi còn gì
Nếu mảng này là dữ liệu trên sheet thì càng dễ: Dùng Remove Duplicates

 

[NguyenNgocSon]

Dùng Dictionary, trên GPE có đầy rồi còn gì
Nếu mảng này là dữ liệu trên sheet thì càng dễ: Dùng Remove Duplicates

Cám ơn Bác. Có nhiều Code nhưng dùng cho mảng 1 chiều thôi
Mảng 2 chiều em tìm và sửa mãi vẫn chưa xong

 

[dhn46]

Cám ơn Bác. Có nhiều Code nhưng dùng cho mảng 1 chiều thôi
Mảng 2 chiều em tìm và sửa mãi vẫn chưa xong

Như vậy bạn biết sử dụng cho 1 chiều. Vậy biến 2 chiều thành 1 chiều rồi xử lý.

Bước 1: chuyển 2 thành 1 => 12#23;12#23;24#35;10#30;24#35 (Nối các phần tử bằng dấu # chẳng hạn)
Bước 2: áp dụng phần chữ đỏ
Bước 3: tách 1 chiều thu được ra 2 chiều.

 

[hungpecc1]

Cám ơn Bác. Có nhiều Code nhưng dùng cho mảng 1 chiều thôi
Mảng 2 chiều em tìm và sửa mãi vẫn chưa xong

Up thử file 1 ví dụ lên diễn đàn xem thế nào !
Nói chung có 1 số cách để lọc dữ liệu trùng như sau :
* Dùng công cụ Advanced Filter, Remove duplicate
* Dùng Scripting.Dictionary
* Dùng câu lệnh SQL hay còn gọi là dùng Ado : SELECT DISTINCT