Các anh cho em được xin chỉ giáo liệt kê nhiều giá trị trong cột có điều kiện

Liên hệ QC

thaihavu

Thành viên mới
Tham gia
21/3/19
Bài viết
3
Được thích
0
Em có bảng gồm 3 cột ID, STT và Date
Em muốn 1 công thức đưa ra tất cả các ID mà có điều kiện STT = c và Date = 21/03/2019
Cột cuối là kết quả giống mong muốn của em. Cho em xin công thức mí ạ :D Thanksss

P/s: Vì không được phép filter file nên em mới xin công thức ạ
 

File đính kèm

  • 2019-03-21_10-42-41.png
    2019-03-21_10-42-41.png
    5 KB · Đọc: 11
  • Untitled spreadsheet.xlsx
    5.1 KB · Đọc: 3
Em có bảng gồm 3 cột ID, STT và Date
Em muốn 1 công thức đưa ra tất cả các ID mà có điều kiện STT = c và Date = 21/03/2019
Cột cuối là kết quả giống mong muốn của em. Cho em xin công thức mí ạ :D Thanksss

P/s: Vì không được phép filter file nên em mới xin công thức ạ
File đâu ta.
 
Đây ạ em đính kèm thiếu
Đây nhé bạn.Mình không biết hàm excel bạn dùng hàm này thử xem.
Mã:
Function laygiatri(ByVal mang As Range, ByVal dk As String, ByVal dk1 As Date, Optional so As Integer = 2, Optional so1 As Integer = 3) As String
         Dim arr, i As Long, s As String
         arr = mang.Value
         For i = 1 To UBound(arr, 1)
            If UCase(arr(i, so)) = UCase(dk) Then
               If CLng(CDate(arr(i, so1))) = CLng(dk1) Then
                  If Len(s) = 0 Then s = arr(i, 1) Else s = s & "," & arr(i, 1)
               End If
            End If
        Next i
        laygiatri = s
End Function
Mã:
=laygiatri($B$2:$D$9,C2,D2,2,3)
 

File đính kèm

  • Untitled spreadsheet.xlsm
    15.2 KB · Đọc: 3
Đây nhé bạn.Mình không biết hàm excel bạn dùng hàm này thử xem.
Mã:
Function laygiatri(ByVal mang As Range, ByVal dk As String, ByVal dk1 As Date, Optional so As Integer = 2, Optional so1 As Integer = 3) As String
         Dim arr, i As Long, s As String
         arr = mang.Value
         For i = 1 To UBound(arr, 1)
            If UCase(arr(i, so)) = UCase(dk) Then
               If CLng(CDate(arr(i, so1))) = CLng(dk1) Then
                  If Len(s) = 0 Then s = arr(i, 1) Else s = s & "," & arr(i, 1)
               End If
            End If
        Next i
        laygiatri = s
End Function
Mã:
=laygiatri($B$2:$D$9,C2,D2,2,3)
Ặc em cần công thức excel cơ đại ca ơi không fai code đâu
 
Web KT
Back
Top Bottom