Hàm thống kê tất cả dữ liệu (3 người xem)

[vantrinh1]

Em có file ví dụ như file đính kèm
cho em hỏi quý anh chị, dùng công thức nào để khi tìm Mã thì thống kế ra tất cả kết quả
Ví dụ : mình tìm B thì ra kết quả dạng Toán - Văn
Tìm C thì ra kết quả : Toán - Tin
Em dùng hàm Vlookup chỉ thống kê ra được một kết quả đầu tiên
Mong anh chị chỉ giáo
em cảm ơn

 

[snow25]

Em có file ví dụ như file đính kèm
cho em hỏi quý anh chị, dùng công thức nào để khi tìm Mã thì thống kế ra tất cả kết quả
Ví dụ : mình tìm B thì ra kết quả dạng Toán - Văn
Tìm C thì ra kết quả : Toán - Tin
Em dùng hàm Vlookup chỉ thống kê ra được một kết quả đầu tiên
Mong anh chị chỉ giáo
em cảm ơn

Dùng hàm này nhé.

Function thongke(ByVal dk As String, ByVal mang As Range, Optional so As Integer = 2) As String
         Dim arr, i As Long, s As String
         arr = mang.Value
         For i = 1 To UBound(arr, 1)
             If UCase(arr(i, 1)) = UCase(dk) Then
                If Len(s) = 0 Then s = arr(i, so) Else s = s & "-" & arr(i, so)
             End If
         Next i
         thongke = s
End Function

=thongke("B",$D$5:$E$12,2)

 

[vantrinh1]

cảm ơn anh nhiều, chúc anh sức khỏe

Dùng hàm này nhé.

Function thongke(ByVal dk As String, ByVal mang As Range, Optional so As Integer = 2) As String
         Dim arr, i As Long, s As String
         arr = mang.Value
         For i = 1 To UBound(arr, 1)
             If UCase(arr(i, 1)) = UCase(dk) Then
                If Len(s) = 0 Then s = arr(i, so) Else s = s & "-" & arr(i, so)
             End If
         Next i
         thongke = s
End Function

=thongke("B",$D$5:$E$12,2)

 

[huonglien1901]

Em có file ví dụ như file đính kèm
cho em hỏi quý anh chị, dùng công thức nào để khi tìm Mã thì thống kế ra tất cả kết quả
Ví dụ : mình tìm B thì ra kết quả dạng Toán - Văn
Tìm C thì ra kết quả : Toán - Tin
Em dùng hàm Vlookup chỉ thống kê ra được một kết quả đầu tiên
Mong anh chị chỉ giáo
em cảm ơn

mượn hàm của thầy @ndu96081631 !

=JoinText("-",IF($D$5:$D$12=$C$5,$E$5:$E$12,1/0))

bạn nhấn CTRL+SHIFT+ENTER