Xin giúp đỡ tìm các dòng có dữ liệu giống nhau để xoá đi (1 người xem)

[van_utc]

Các anh chị ơi cho em hỏi em nhập một bảng excel hơn 7000 dòng nhưng do sơ suất nên có những dòng em đã nhập rồi em lại nhập lại nữa vậy giờ có cách nào tìm được (tất nhiên là không phải thủ công) để xoá đi được không ạ? Bảng excel của em gồm có các cột: Họ tên, trường, lớp, số điện thoại, ghi chú.. Em mong các anh chị nào biết chỉ giúp em luôn với vì em cần gấp quá mà cứ làm thủ công thì lâu lắm. Em cảm ơn nhiều ạ.

 

[hoamattroicoi]

Các anh chị ơi cho em hỏi em nhập một bảng excel hơn 7000 dòng nhưng do sơ suất nên có những dòng em đã nhập rồi em lại nhập lại nữa vậy giờ có cách nào tìm được (tất nhiên là không phải thủ công) để xoá đi được không ạ? Bảng excel của em gồm có các cột: Họ tên, trường, lớp, số điện thoại, ghi chú.. Em mong các anh chị nào biết chỉ giúp em luôn với vì em cần gấp quá mà cứ làm thủ công thì lâu lắm. Em cảm ơn nhiều ạ.

Bạn tính xóa bằng Excel ấy ạ, hay là chỉ hướng dẫn qua câu chữ thôi, nếu dữ liệu chuẩn thì có thể dùng code lọc duy nhất các hàng đổ sang sheet khác mà không cần xóa dữ liệu cũ đó.

 

[van_utc]

Em muốn xoá đi các dòng trùng nhau vì bảng này nhập dữ liệu của các bạn tham gia cuộc thi nên mỗi bạn chỉ là 1 dòng thôi mà em lại sơ suất nhập 2 hay 3 lần rồi.

 

[khunglongcodon]

Nếu bạn dùng Excel 2010 thì dùng chức năng Data => Remove Duplicates đó. Chọn bảng, bấm vào, ok xong.
Hoặc có thể dùng advanced Filter trích lọc không trùng ( bấm chọn vào Unique records only)
Thân

 

[van_utc]

Nếu bạn dùng Excel 2010 thì dùng chức năng Data => Remove Duplicates đó. Chọn bảng, bấm vào, ok xong.
Hoặc có thể dùng advanced Filter trích lọc không trùng ( bấm chọn vào Unique records only)
Thân

Em dùng excel 2003, với cả mấy bước hướng dẫn kia em cũng chưa rành lắm. Em gửi file lên các anh chị xem giúp em với nhé.

 

[van_utc]

Mọi người đi nghỉ ngơi hết rồi. Em cảm ơn mọi người nha.

 

[khunglongcodon]

Mình gấp quá mà 3G nhà mình chậm quá
bạn down về nhé
chỉ cần trích lọc không trùng từ cột 2 => 14 là xong thôi mà
http://www.mediafire.com/?1orj404vrrtnno7

 

[van_utc]

Mình gấp quá mà 3G nhà mình chậm quá
bạn down về nhé
chỉ cần trích lọc không trùng từ cột 2 => 14 là xong thôi mà
http://www.mediafire.com/?1orj404vrrtnno7

Em cảm ơn khunglongcodon.

 

[hoamattroicoi]

Em cảm ơn khunglongcodon. Em chưa hiểu "trích lọc không trùng" khunglongcodon à. Khunglongcodon có thể fix giúp em bảng đó được không? Em tải file về xem qua thấy Số thứ tự 70 và 71 trùng nhau mà chưa bị loại bỏ.

Chắc phải thế này :

Sub Trichloc()
Dim Dic As Object, dArr(), sArr(), k As Long, Dk, Sh As Worksheet, j As Long, i As Long
Set Sh = Sheets("Danhsach")
Set Dic = CreateObject("scripting.dictionary")
         sArr = Sh.Range(Sh.[A4], Sh.[D8000].End(xlUp).Offset(, 9)).Value
         ReDim dArr(1 To UBound(sArr), 1 To 11)
         For i = 1 To UBound(sArr)
          Dk = sArr(i, 2) & sArr(i, 3) & sArr(i, 4) & sArr(i, 5)
          Dk = UCase(Dk)
            If Not Dic.exists(Dk) Then
               k = k + 1
               Dic.Add Dk, k
               dArr(k, 1) = k
               For j = 2 To 11
                    dArr(k, j) = sArr(i, j)
                Next
            End If
        Next
    Sheet1.[A4:M8000].ClearContents
If k Then Sheet1.[A4].Resize(k, 11) = dArr
Set Dic = Nothing
End Sub

Qua sheet Ket qua để xem nhé, dữ liệu không đồng nhất cũng khó mà xóa được hết các trường hợp ví dụ Trần Vân Anh với Traần Vân Anh, cái này bạn phải tự khắc phục thôi! Mình gom cột 2, 3, 4, 5 lại để trích duy nhất sang sheet Ket qua. Vì cùng 1 tên có thể khác trường, khác lớp, khác số điện thoại.
(Van_utc công tác tại Đại học Hải Phòng à?)

 

[van_utc]

Chắc phải thế này :

Sub Trichloc()
Dim Dic As Object, dArr(), sArr(), k As Long, Dk, Sh As Worksheet, j As Long, i As Long
Set Sh = Sheets("Danhsach")
Set Dic = CreateObject("scripting.dictionary")
         sArr = Sh.Range(Sh.[A4], Sh.[D8000].End(xlUp).Offset(, 9)).Value
         ReDim dArr(1 To UBound(sArr), 1 To 11)
         For i = 1 To UBound(sArr)
          Dk = sArr(i, 2) & sArr(i, 3) & sArr(i, 4) & sArr(i, 5)
          Dk = UCase(Dk)
            If Not Dic.exists(Dk) Then
               k = k + 1
               Dic.Add Dk, k
               dArr(k, 1) = k
               For j = 2 To 11
                    dArr(k, j) = sArr(i, j)
                Next
            End If
        Next
    Sheet1.[A4:M8000].ClearContents
If k Then Sheet1.[A4].Resize(k, 11) = dArr
Set Dic = Nothing
End Sub

Qua sheet Ket qua để xem nhé, dữ liệu không đồng nhất cũng khó mà xóa được hết các trường hợp ví dụ Trần Vân Anh với Traần Vân Anh, cái này bạn phải tự khắc phục thôi! Mình gom cột 2, 3, 4, 5 lại để trích duy nhất sang sheet Ket qua. Vì cùng 1 tên có thể khác trường, khác lớp, khác số điện thoại.
(Van_utc công tác tại Đại học Hải Phòng à?)

Em cảm ơn hoamattroicoi nhé.

 

[TrungChinhs]

Các anh chị ơi cho em hỏi em nhập một bảng excel hơn 7000 dòng nhưng do sơ suất nên có những dòng em đã nhập rồi em lại nhập lại nữa vậy giờ có cách nào tìm được (tất nhiên là không phải thủ công) để xoá đi được không ạ? Bảng excel của em gồm có các cột: Họ tên, trường, lớp, số điện thoại, ghi chú.. Em mong các anh chị nào biết chỉ giúp em luôn với vì em cần gấp quá mà cứ làm thủ công thì lâu lắm. Em cảm ơn nhiều ạ.

Nếu làm thủ công (đơn giản nhất) thì bạn làm như sau:
1- Tạo mã lọc ra cột phụ: Tại N4 nhập công thức =D4&C4 để lấy mã lọc là họ tên và lớp.
2- Tại O4 nhập công thức =COUNTIF($N$4:N4;N4) để đếm số lần xuất hiện của từng mã.
3- Copy công thức xuống hết bảng.
4- Autofilter cột O, chọn Custom | nhập số 1 | chọn Does not equal để lọc các số khác 1
5- Chọn O4 đến hết bảng và rút dòng.
6- Làm xong thì xóa cột phụ đi.
Trong File đính kèm tôi đã làm từ 1 đến 4 bạn xem và làm theo nha. Đọc thì lằng nhằng chứ làm thì cái Roẹt - đơn giản như đan giổ.

 

[tranminhdungs]

Bạn sử dụng excel 2007 cũng dùng remove duplicate được. Vào tab Data sẽ thấyèeCòn nếu sử dụng 2003 thì có thể dùng cách thủ công bằng hàm Countifs. Bạn dùng hàm này để đếm nhiều điều kiện. Mình dùng thử của bạn như sau. =Countifs($C$4:$C$7777,D4,$D$4:$D$7777,D4,$E$4:$E$7777,E4). Mình nghĩ 3 cột này sẽ cho ra dữ liệu unique. Tuy nhiên, bị một số lỗi vì có chỗ không có số đt hoặc không có tên -> hiển thị đếm =0. Và bạn phải sort lại theo kết quả đếm để xóa những tên trùng lắp. Cách này hơi mất thời gian.

Tốt nhất vẫn là dùng Remove duplicate. Chọn hết toàn bộ dữ liệu và click là xong.

Chúc bạn thành công.

 

[khunglongcodon]

Bạn sử dụng excel 2007 cũng dùng remove duplicate được. Vào tab Data sẽ thấyèeCòn nếu sử dụng 2003 thì có thể dùng cách thủ công bằng hàm Countifs. Bạn dùng hàm này để đếm nhiều điều kiện. Mình dùng thử của bạn như sau. =Countifs($C$4:$C$7777,D4,$D$4:$D$7777,D4,$E$4:$E$7777,E4). Mình nghĩ 3 cột này sẽ cho ra dữ liệu unique. Tuy nhiên, bị một số lỗi vì có chỗ không có số đt hoặc không có tên -> hiển thị đếm =0. Và bạn phải sort lại theo kết quả đếm để xóa những tên trùng lắp. Cách này hơi mất thời gian.

Tốt nhất vẫn là dùng Remove duplicate. Chọn hết toàn bộ dữ liệu và click là xong.

Chúc bạn thành công.

2003 làm gì có countifs bạn ơi