Xóa những dòng không trùng

[kegiaumat055]

Xin chào mọi người.
Mình có một vấn đề cần mọi người giúp đỡ. Đó là mình cần xóa những dòng không trùng của cột này so với cột kia.
Ví dụ:

------- A---------------------------------------------B
1 http://test.com --------------------------moi vao http://google.com
2 http://blogspot.com ----------------------moi vao http://blogspot.com
3 ------------------------------------------xin chao
4 ------------------------------------------truy cap http://test.com

thì sau khi xóa, cột B chỉ còn lại 2 giá trị là: truy cap http://test.com và moi vao http://blogspot.com
Dưới đây là file ví dụ.

Cám ơn các bạn !
Với dữ liệu thực thì cột A có vài trăm dòng và cột B có vài nghìn dòng !

 

[nghiaphuc]

Xin chào mọi người.
Mình có một vấn đề cần mọi người giúp đỡ. Đó là mình cần xóa những dòng không trùng của cột này so với cột kia.
Ví dụ:


thì sau khi xóa, cột B chỉ còn lại 2 giá trị là: truy cap http://test.com và moi vao http://blogspot.com
Dưới đây là file ví dụ.

Cám ơn các bạn !
Với dữ liệu thực thì cột A có vài trăm dòng và cột B có vài nghìn dòng !

Có phải bạn muốn xóa những hàng mà trên cột A không có nội dung? Nếu đúng thì bạn chèn thêm 1 dòng tiêu đề, sau đó sử dụng Autofilter để lọc ra các dòng trống ở cột A rồi xóa tất cả các dòng kết quả (Delete Rows)

 

[vodoi2x]

Xin chào mọi người.
Mình có một vấn đề cần mọi người giúp đỡ. Đó là mình cần xóa những dòng không trùng của cột này so với cột kia.
Ví dụ:


thì sau khi xóa, cột B chỉ còn lại 2 giá trị là: truy cap http://test.com và moi vao http://blogspot.com
Dưới đây là file ví dụ.

Cám ơn các bạn !
Với dữ liệu thực thì cột A có vài trăm dòng và cột B có vài nghìn dòng !

Nếu vậy tại cột C bạn dùng công thức: C2: =A2<>B2 , copy cho các ô còn lại của C
sau đó sử dụng Autofilter để lọc ra các dòng có giá trị TRUE ở cột C rồi xóa tất cả các dòng kết quả này -Delete Rows

 

[kegiaumat055]

Không phải vậy đâu, các bạn hiểu nhầm ý mình rồi ! Mình đã sửa lại ví dụ rồi đấy. So sánh các dòng của cột A so với cột B, nếu dòng nào cột B có chứa dòng cột A thì sẽ giữ lại, nếu không có thì xoá đi !
Cám ơn các bạn đã trả lời !

 

[TrungChinhs]

Cách 1: dùng VBA

Sub Macro1()
    On Error Resume Next
    Set Rng = Range("a1:a" & [b65000].End(3).Row)
    For Each cls In Rng
        tmp = Rng.Offset(, 1).Find(cls, , , 2).Address
        If tmp > 0 Then Range(tmp)(1, 2) = "xx"
        tmp = 0
    Next
    Rng.Offset(, 2).SpecialCells(4).EntireRow.Delete
    Rng.Offset(, 2).Clear
    Rng.Clear
End Sub

Cách 2: làm thủ công
- Copy dữ liệu cột B sang cột phụ 1
- Trong cột phụ 1 dùng Relace để xóa các ký tự đứng trước http (trong Find what nhập * http; trong Relace with nhập http chọn Replce All để lấy riêng địa chỉ Web)
- Trong cột phụ 2 dùng Vlookup tham chiếu đến cột A để tìm dữ liệu tại cột phụ 1
- Dùng Autofilter để lọc và xóa các dòng #N/A tại cột phụ 2

 

[kegiaumat055]

Cách 1: dùng VBA

Sub Macro1()
    On Error Resume Next
    Set Rng = Range("a1:a" & [b65000].End(3).Row)
    For Each cls In Rng
        tmp = Rng.Offset(, 1).Find(cls, , , 2).Address
        If tmp > 0 Then Range(tmp)(1, 2) = "xx"
        tmp = 0
    Next
    Rng.Offset(, 2).SpecialCells(4).EntireRow.Delete
    Rng.Offset(, 2).Clear
    Rng.Clear
End Sub

Cách 2: làm thủ công
- Copy dữ liệu cột B sang cột phụ 1
- Trong cột phụ 1 dùng Relace để xóa các ký tự đứng trước http (trong Find what nhập * http; trong Relace with nhập http chọn Replce All để lấy riêng địa chỉ Web)
- Trong cột phụ 2 dùng Vlookup tham chiếu đến cột A để tìm dữ liệu tại cột phụ 1
- Dùng Autofilter để lọc và xóa các dòng #N/A tại cột phụ 2

Đúng rồi bạn à. Nhưng mà mình nhầm, mình đổi lại ví dụ rồi đấy. Ở cột B không chỉ có 2 cái http mà có nhiều cái http nữa. Cách của bạn thì chỉ xóa những dòng không có http thôi !

 

[TrungChinhs]

Tôi đã kiểm tra lại, cả 2 phương pháp đều cho kết quả như bạn yêu cầu mà. Vậy dòng nào muốn xóa mà không xóa được, sao bạn không đưa nó lên. Bạn hà tiện dữ liệu vậy thì lấy gì kiểm tra? thiệt tình ...

 

[kegiaumat055]

Tôi đã kiểm tra lại, cả 2 phương pháp đều cho kết quả như bạn yêu cầu mà. Vậy dòng nào muốn xóa mà không xóa được, sao bạn không đưa nó lên. Bạn hà tiện dữ liệu vậy thì lấy gì kiểm tra? thiệt tình ...

Xin lỗi, lúc trước mình chưa thử 2 cách của bạn. Giờ mình thử thì thấy thành công rồi !
Mình chỉ đưa một vài ví dụ cho đơn giản thôi, chứ file thật nhiều thứ lắm. Bạn bỏ qua nhé . Cám ơn bạn nhiều !