Hướng dẫn lọc dữ liệu (1 người xem)

  • Thread starter Thread starter vsitcnh
  • Ngày gửi Ngày gửi

Người dùng đang xem chủ đề này

vsitcnh

Thành viên chính thức
Tham gia
10/4/13
Bài viết
50
Được thích
1
Chào các bạn!
Hiện mình có 1 1 bảng tính doanh thu của các bạn nhân viên gồm 3 sheet: KQPT, NS, DATA.
Trong Sheet KQPT mình muốn lấy dữ liệu từ sheet data thỏa mãn đk: Chỉ lấy doanh thu nếu thỏa mãn đk về msnv và nhóm hàng.
Ví dụ trong ô G3 mình muốn lấy dữ liệu doanh thu của bạn có mã nv là: 13234 và thuộc nhóm hàng Miếng dán mặt trước.

Thank team hỗ trợ!
 

File đính kèm

không ai hỗ trợ được vụ này ta?
 
không ai hỗ trợ được vụ này ta?
file của bạn không quá khó nhưng bạn cần thiết kế lại file,
Đừng để trộn ô nhiểu, excel và VBA cũng dị ứng cái này.
Bạn thiết kế lại đảm bảo không quá nửa tiếng sẽ có người có thể giúp được bạn
Bạn có thể tham khảo file đính kèm
PHP:
Sub Tim()
Dim Sarr, Darr, I As Long, J As Long, k As Long, Tmp, KQ(1 To 65000, 1 To 2)
With Sheets("DATA")
    Sarr = .Range(.[A4], .[A65000].End(xlUp)).Resize(, 3).Value2
End With
With Sheets("KQPT")
    Tmp = .[D1]
    Darr = .Range(.[B5], .[B65000].End(xlUp)).Resize(, 4).Value2


    For I = 1 To UBound(Sarr, 1)
        For J = 1 To UBound(Darr, 1)
            If Sarr(I, 1) = Darr(J, 2) And Sarr(I, 2) = Tmp Then
                k = k + 1
                KQ(k, 1) = Sarr(I, 3)
            End If
        Next J
    Next I
    .[D5:E65000].ClearContents
    .[D5].Resize(k, 2).Value = KQ
End With
End Sub
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$1" Then
    Call Tim
End If
End Sub
 

File đính kèm

Lần chỉnh sửa cuối:

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

Back
Top Bottom