Giúp mình công thức tự động lọc dữ liệu trùng nhau

Liên hệ QC

prtrungdd

Thành viên mới
Tham gia
2/1/09
Bài viết
7
Được thích
1
Mình có bài toán khó nhai quá. Mọi người giúp mình nhé. Công thức hay thủ thuật để tự động lọc dữ liệu theo 2 cột. Mình cám ơn
 

File đính kèm

Mình có bài toán khó nhai quá. Mọi người giúp mình nhé. Công thức hay thủ thuật để tự động lọc dữ liệu theo 2 cột. Mình cám ơn
- Bạn đặt chuột vào bảng dữ liệu nguồn đó. Vào Data\Filter\advanced Filter
Đánh dấu vào copy to another location và Unique records only
trong mục copy to chỉ chuột vào ô cần đặt dữ liệu xuất ra. ok
- Nếu bạn dùng phiên bản office 2007 trở lên thì chỉ copy dữ liệu ra 1 chỗ và bôi đen chọn Data\ Remove duplicates là ok
 
Mình có bài toán khó nhai quá. Mọi người giúp mình nhé. Công thức hay thủ thuật để tự động lọc dữ liệu theo 2 cột. Mình cám ơn

Bạn làm theo tớ hướng dẫn nhé.
Bạn bôi đen vùng tính C4:D17, tiếp theo bạn vào Data chọn Filter/Advanced/ sẽ hiện ra bảng Advanced filter, bạn chọn (Copy to another location).
Tiếp theo mục List range bạn chọn vùng $C$4:$D$16
Tiếp theo mục Criteria range bạn chọn vùng $C$4:$D$16
Tiếp theo mục Copy to bạn chọn $E$5:$F$16
Cuối cùng tích vào dấu unique records only ok
p/s bạn thử thao tác trong bảng tính xem.
 
Chỉnh sửa lần cuối bởi điều hành viên:

File đính kèm

Mọi người hiểu sai y’ mình rồi. Mình cần lọc dữ liệu không trùng nhau từ dữ liệu C5:D16.
Dùng công thức nào để tự động lọc ra kết quả như C9:D26. Nếu dùng advance filter thì sẽ phải thao tác như bạn NguyenCanh160890. Mình muốn làm thế nào để tự động lọc. Mong cac bro giúp
 
Mọi người hiểu sai y’ mình rồi. Mình cần lọc dữ liệu không trùng nhau từ dữ liệu C5:D16.
Dùng công thức nào để tự động lọc ra kết quả như C9:D26. Nếu dùng advance filter thì sẽ phải thao tác như bạn NguyenCanh160890. Mình muốn làm thế nào để tự động lọc. Mong cac bro giúp[/QUO


Anh(Chị) muốn tự động chắc có lẽ các Thầy viết VBA xong nhấn nút là chạy hihi
 
Sử dụng cột phụ và Name:
Đặt name DATA =Sheet1!$C$5:$C$16&" "&Sheet1!$D$5:$D$16
Cột phụ: F5: =IFERROR(INDEX(DATA,MATCH(0,COUNTIF($F$4:F4,DATA),0),),"") Ctrl+Shift+Enter
Tách Cty: G5: =LEFT(F5,3)
Tách Ma Hang: H5: =RIGHT(F5,6)
 

File đính kèm

Bạn thử tham khảo file đính kèm, mình dùng vba
- Nếu bạn muốn tự động thì có thể viết thêm worksheet_change
- Còn mình thì dùng nút ok ^^
Mã:
Sub Locdulieu()
Dim item, arr(), cty, mhang
Dim n As Long, irow As Long, tmp As String
    cty = Range("C5", [C65536].End(xlUp))
    mhang = Range("D5", [D65536].End(xlUp))
    ReDim arr(1 To UBound(cty, 1), 1 To 2)
    With CreateObject("Scripting.dictionary")
        For Each item In cty
            irow = irow + 1
            tmp = Trim(CStr(item)) & Trim(CStr(mhang(irow, 1)))
            If Len(tmp) And Not .Exists(tmp) Then
                n = n + 1
                .Add tmp, n
                arr(n, 1) = cty(irow, 1)
                arr(n, 2) = mhang(irow, 1)
            End If
        Next
    End With
        Range("f1:G1000").ClearContents
        Range("F5").Resize(n, 2) = arr
End Sub
 
Lần chỉnh sửa cuối:
Công ty
=INDEX($C$5:$C$16,SMALL(IF(MATCH($C$5:$C$16&$D$5:$D$16,$C$5:$C$16&$D$5:$D$16,0)=ROW(INDIRECT("1:"&ROWS($C$5:$C$16))),ROW(INDIRECT("1:"&ROWS($C$5:$C$16))),""),ROW(1:1)))
Mã hàng
=INDEX($D$5:$D$16,SMALL(IF(MATCH($C$5:$C$16&$D$5:$D$16,$C$5:$C$16&$D$5:$D$16,0)=ROW(INDIRECT("1:"&ROWS($C$5:$C$16))),ROW(INDIRECT("1:"&ROWS($C$5:$C$16))),""),ROW(1:1)))

Kết thúc bằng: Ctrl + Shift + Enter nhé bạn.
 
Các bác cho mình hỏi cái nha!mình đang có một số dữ liệu trong file excel tên người được viết bằng tiếng việt,mình muốn chuyển dữ liệu trên thành file mới mà tên người không có dấu(giống như tiếng anh vậy)bác nào biết thì chỉ giao mình cái nha! Email mình:kimhoangthach@gmail.com thanks các bác nhiều!
 
Web KT

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

Back
Top Bottom