Giúp mình lọc 2 cột trùng nhau (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

cheng1511

Thành viên mới
Tham gia
27/11/14
Bài viết
7
Được thích
0
mình có 2 cột excel, 2 cột đó gần như giống nhau. mình muốn lọc những dòng không giống nhau ra hoặc xóa những dòng trùng kia bằng cách nào vây **~**
ví dụ:
2 2
3 3
4 4
4 5
5 6
6 6
Cảm ơn mn ;;;;;;;;;;;
 
mình có 2 cột excel, 2 cột đó gần như giống nhau. mình muốn lọc những dòng không giống nhau ra hoặc xóa những dòng trùng kia bằng cách nào vây **~**
ví dụ:
2 2
3 3
4 4
4 5
5 6
6 6
Cảm ơn mn ;;;;;;;;;;;
úp file giả lập lên mình coi nếu được mình làm cho
 
Bạn xem trong file kèm theo nhé.
nếu Bạn biết sử dụng code thì tham khảo code sau nha xem thế nào nha
xoá trùng ( code này mình tham khảo của một người bạn)
PHP:
Sub DelDuLieu_Trung()
Dim nguon(), i As Long, KQ(), k As Long
nguon = Range([C3], [C65536].End(3)).Resize(, 2).Value
ReDim KQ(1 To UBound(nguon, 1), 1 To UBound(nguon, 2))
With CreateObject("scripting.dictionary")
   For i = 1 To UBound(nguon)
      If Not .exists(nguon(i, 1)) Then
         .Add nguon(i, 1), ""
      Else
         k = k + 1
         KQ(k) = nguon(i, 1)
      End If
   Next
   For i = 1 To k
      If .exists(KQ(i)) Then
         .Remove (KQ(i))
      End If
   Next
   [E3].Resize(.Count) = Application.Transpose(.Keys)
End With
End Sub
 

File đính kèm

cam on moi nguoi nha. minh dung if(a=b;"";"") de sang cot khac dc roi. }}}}}
 
cam on moi nguoi nha. minh dung if(a=b;"";"") de sang cot khac dc roi. }}}}}

Lưu ý: Viết tiếng Việt có dấu đàng hoàng nha bạn
--------------------
Ah mà công thức if(a=b;"";"") này bạn có thể rút gọn thành = "" là được rồi. Thậm chí là.. khỏi làm gì cả nó cũng ra đúng ý bạn--=0
 
Web KT

Bài viết mới nhất

Back
Top Bottom