Lọc tìm số PO chưa xác định

Chia sẻ bởi:hands
★★★★★
Quảng cáo

Em chào các anh/chị giải pháp Excel
Em đang muốn lọc tìm những PO mà chưa xác định. Em có tìm trên GPE mà không tìm thấy bài nào giống của em, hay cũng có thể em không tìm được. Mong anh/chị giúp đỡ.

Bạn thử chạy code sau và kiểm tra kết quả nhé!

Sub GPE()
    Dim Arr(), Res(1 To 1000, 1 To 2), i&, j&, k&
    On Error Resume Next
    With Sheets("Sheet1")
        Arr = .Range("B8:F26").Value
        .Range("N9:O100").ClearContents
        For i = 2 To UBound(Arr)
            For j = 2 To UBound(Arr, 2)
                If Arr(i, j) = "X" Then
                    k = k + 1
                    Res(k, 1) = "PO" & Split(Arr(i, 1), "-")(2)
                    Res(k, 2) = Arr(1, j)
                End If
            Next j
        Next i
        .Range("N9").Resize(k, 2).Value = Res
    End With
End Sub

www.giaiphapexcel.com/diendan/threads/l%E1%BB%8Dc-t%C3%ACm-s%E1%BB%91-po-ch%C6%B0a-x%C3%A1c-%C4%91%E1%BB%8Bnh.163712/post-1092110

1 PO chỉ có 1 LOẠI X thôi hay nhiều hơn.

Ui VBA nhanh thật đó. Cảm ơn bạn nhiều nhá
Dạ 1 PO chỉ có 1 X : chưa xác định thôi ạ

Vậy dùng công thức này, Excel365

=LET(loai,BYROW(IF(C9:F26="X",C8:F8,""),LAMBDA(b,CONCAT(b))),FILTER(HSTACK("PO"&TEXTAFTER(B9:B26,"-",-1),loai),loai<>""))

www.giaiphapexcel.com/diendan/threads/l%E1%BB%8Dc-t%C3%ACm-s%E1%BB%91-po-ch%C6%B0a-x%C3%A1c-%C4%91%E1%BB%8Bnh.163712/post-1092113

Cảm ơn anh. Em dùng Excel 2016

K9 =IFERROR("PO"&MID(INDEX($B$9:$B$26,AGGREGATE(15,6,ROW($1:$100)/($C$9:$F$26="X"),ROWS($1:1))),14,9),"")
L9 =IFERROR(INDEX($C$8:$F$8,,MATCH("X",INDEX($C$9:$F$26,AGGREGATE(15,6,ROW($1:$100)/($C$9:$F$26="X"),ROWS($1:1)),),0)),"")

Copy xuống . . .

www.giaiphapexcel.com/diendan/threads/l%E1%BB%8Dc-t%C3%ACm-s%E1%BB%91-po-ch%C6%B0a-x%C3%A1c-%C4%91%E1%BB%8Bnh.163712/post-1092116

Thiết kế Tổng đãi ngộ (Total Rewards) theo khung SHRM
Khóa học SprinGO phù hợp

Thiết kế Tổng đãi ngộ (Total Rewards) theo khung SHRM

Khóa học “Thiết kế Tổng phần thưởng (Total Reward) chuẩn khung SHRM” giúp bạn nắm vững toàn bộ hệ thống đãi ngộ theo chuẩn...

Xem khóa học
★★★★★ 5 ★ 1 👤 0 ▥ 0
Quảng cáo

Bạn nên đọc

Leave a Reply

Your email address will not be published. Required fields are marked *

Quảng cáo

Cũ vẫn chất

Xem thêm