Nhờ tạo macro lọc dữ liệu trùng trong 1 cột (1 người xem)

[Tnhatanh68]

Mình muốn lọc dữ liệu trùng nhau trong 1 cột của excel, những giá trị nào ở dưới trùng với giá trị đã có ở trên thì được xóa bớt. Thông thường mình làm bằng tay rất mất công nên xin nhờ mọi người giúp đỡ mình với

Mình cảm ơn rất nhiều, mong mọi người dành chút thời gian xem qua giùm mình

Mình thấy có cách Filter rồi, chỉ là hỏi cách dùng macro, mong mọi người không phiền

Dữ liệu mẫu như file đính kèm

 

[giaiphap]

Mình muốn lọc dữ liệu trùng nhau trong 1 cột của excel, những giá trị nào ở dưới trùng với giá trị đã có ở trên thì được xóa bớt. Thông thường mình làm bằng tay rất mất công nên xin nhờ mọi người giúp đỡ mình với

Mình cảm ơn rất nhiều, mong mọi người dành chút thời gian xem qua giùm mình

Mình thấy có cách Filter rồi, chỉ là hỏi cách dùng macro, mong mọi người không phiền

Dữ liệu mẫu như file đính kèm

Bạn dùng thử code này xem sau:

Sub GPE()
Dim dong As Integer, i As Integer
dong = Range("a65000").End(xlUp).Row
For i = dong To 2 Step -1
  If Application.WorksheetFunction.CountIf(Range("a2:a" & i), Cells(i, 1).Value) > 1 Then Cells(i, 1).EntireRow.Delete
Next i
End Sub

 

[Ba Tê]

Mình muốn lọc dữ liệu trùng nhau trong 1 cột của excel, những giá trị nào ở dưới trùng với giá trị đã có ở trên thì được xóa bớt. Thông thường mình làm bằng tay rất mất công nên xin nhờ mọi người giúp đỡ mình với

Mình cảm ơn rất nhiều, mong mọi người dành chút thời gian xem qua giùm mình

Mình thấy có cách Filter rồi, chỉ là hỏi cách dùng macro, mong mọi người không phiền

Dữ liệu mẫu như file đính kèm

Remove Duplicates thủ công cũng xong, muốn code thì Record Macro lại:
Sub Macro1()
Range("A2:A" & Range("A2").End(xlDown).Row).RemoveDuplicates Columns:=1
End Sub