Nhờ anh chị giúp em lọc dữ liệu từ sheet này qua sheet khác theo 2 điều kiện với ạ (1 người xem)

[tbdinh]

Em có file Tổng hợp khối lượng, trong này file này có 2 sheet NKC và chi tiết tổ. Giờ em muốn lọc một số cột từ bên NKC sang Chi tiết tổ theo 2 điều kiện là " Đợt" và "mã tổ".

Bên sheet Chi tiết tổ, có một số cột mà bên NKC k có thì anh chị đừng quan tâm nhé, vì mấy cột này em thêm vào. Lọc cho em các cột mà bên NKC có thôi ạ

Em cám ơn ạ !

 

[leonguyenz]

Em có file Tổng hợp khối lượng, trong này file này có 2 sheet NKC và chi tiết tổ. Giờ em muốn lọc một số cột từ bên NKC sang Chi tiết tổ theo 2 điều kiện là " Đợt" và "mã tổ".

Bên sheet Chi tiết tổ, có một số cột mà bên NKC k có thì anh chị đừng quan tâm nhé, vì mấy cột này em thêm vào. Lọc cho em các cột mà bên NKC có thôi ạ

Em cám ơn ạ !

Vì chưa thấy ai giúp về code, nên bạn có thể tham khảo công thức với Name điều kiện:

=IF((NKC!$B$5:$B$22='Chi tiết tổ'!$E$4)*(NKC!$D$5:$D$22='Chi tiết tổ'!$E$5),ROW(NKC!$B$5:$B$22),"")

Sử dụng INDEX và SMALL để tham chiếu tương ứng dòng cột, tên công việc:

=INDEX(BANG,SMALL(dk,$A8)-4,6)

 

[tbdinh]

Anh "Hai lúa MIền tây" hoặc ai biết về VB, đọc được bài này thì giúp em giải lại bằng phương pháp VB ạ. Em cám ơn

 

[hoamattroicoi]

Anh "Hai lúa MIền tây" hoặc ai biết về VB, đọc được bài này thì giúp em giải lại bằng phương pháp VB ạ. Em cám ơn

Mình không biết VB, làm cho bạn bằng VBA nhé, hiiiiiii.

Sub LocDL()
Dim i As Long, k As Long, j As Long
Dim sArr(), dArr(), dkdOT As Range, dktO As Range
Set dkdOT = [E4]
Set dktO = [E5]
sArr = Sheet1.Range("A5:L22").Value
ReDim dArr(1 To UBound(sArr, 1), 1 To 10)
For i = 1 To UBound(sArr)
If sArr(i, 2) = dkdOT.Value And sArr(i, 3) = dktO.Value Then
    k = k + 1
    dArr(k, 1) = k
    dArr(k, 2) = sArr(i, 7)
    dArr(k, 3) = sArr(i, 8)
    dArr(k, 4) = sArr(i, 6)
    For j = 5 To 8
        dArr(k, j) = sArr(i, j + 4)
    Next j
End If
Next i
Sheet2.[A8:K100].ClearContents
If k Then Sheet2.[A8].Resize(k, 10) = dArr
End Sub