Xóa những dòng trùng nhau trong excel 2007

[boccoom1368]

Chuyện là em đang gặp vấn đề với file của em, có tới mấy ngàn cái dòng trùng nhau cần phải xóa, nhưng mà mỗi dòng trùng đó lại có những số liệu về giá thành khác nhau, em chỉ được lấy cái giá thành lớn nhất.
Bác nào có kinh nghiệm làm cái này thì giúp em với chứ tình hình là cuối tuần này nằm nhà đến thứ 2 chắc cũng chưa xong quá :thayghe:

View more random threads:

• Sử dụng Autofilter
• Cần giúp đỡ gấp hàm IF và Find
• Filter danh sach/ dữ kiện
• Ebook Công thức và hàm Excel 1997 - 2007
• sự cố EXcell không cho insert dòng làm sao?
• Các chức năng trên excell và word bi khóa thi làm sao ma mơ dươc! Giúp mình với
• [?] Trừ thời gian đối với giờ, phút, giây
• Cách sử dụng hàm OFFSET
• Lỗi font VN-Time
• Lỗi gì đây ta?

[crystal150986]

Ðề: Xóa những dòng trùng nhau trong excel 2007

Chuyện là em đang gặp vấn đề với file của em, có tới mấy ngàn cái dòng trùng nhau cần phải xóa, nhưng mà mỗi dòng trùng đó lại có những số liệu về giá thành khác nhau, em chỉ được lấy cái giá thành lớn nhất.
Bác nào có kinh nghiệm làm cái này thì giúp em với chứ tình hình là cuối tuần này nằm nhà đến thứ 2 chắc cũng chưa xong quá :thayghe:

ko hiểu vấn đề b hỏi cho lắm.b có thể check file đó qua mình xe m dc ko? (thanhlocqb@gmail.com)

[nguyenanhthuoc]

Ðề: Xóa những dòng trùng nhau trong excel 2007

Chuyện là em đang gặp vấn đề với file của em, có tới mấy ngàn cái dòng trùng nhau cần phải xóa, nhưng mà mỗi dòng trùng đó lại có những số liệu về giá thành khác nhau, em chỉ được lấy cái giá thành lớn nhất.
Bác nào có kinh nghiệm làm cái này thì giúp em với chứ tình hình là cuối tuần này nằm nhà đến thứ 2 chắc cũng chưa xong quá :thayghe:

Cái này làm thủ công, cần dùng cột phụ và dùng auto Fillter là thực hiện nhanh chóng, nếu Up load File lên thì anh làm trực tiếp rồi hướng dẫn thì mới dễ hiểu (nếu File chứa khoảng 20.000 dòng thì chỉ thực hiện chưa đầy 5 phút) không có File nên không biết hướng dẫn bằng cách nào.

[thanhluantm]

Ðề: Xóa những dòng trùng nhau trong excel 2007

Sub RemoveDupes()



'Add extra Column, "A" becomes "B"

Columns(1).EntireColumn.Insert



'Filter out duplicates and copy unique list to "A"

Range("B1", Range("B65536").End(xlUp)).AdvancedFilter _

Action:=xlFilterCopy, CopyToRange:=Range("A1"), Unique:=True



'Add extra Column, "B" becomes "A"

Columns(2).EntireColumn.Delete



End Sub

hoặc là

Sub DeleteRows()

With ActiveSheet
Set Rng = Range("A1", Range("B1").End(xlDown))
Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
End With

End Sub