Lọc số liệu trong khoảng từ sheet khác

Liên hệ QC

DIEMXUA1810

Thành viên mới
Tham gia
27/10/10
Bài viết
49
Được thích
9
Chào các anh chị,
em có một file Chấm Công trong đó đã biết tổng số giờ rồi. Bây giờ em muốn lọc nó ra 1 sheet khác theo điều kiện cho trước (between) và hiển thị ra nhưng không biết cách nào cả.
anh/chị biết kết hợp hàm nào như trong file đính kèm giúp đỡ em với. Cái này có thể kết hợp hàm được không ah?
em có ghi chi tiết trong file rồi ah
thanks anh/chị nhiều
 

File đính kèm

  • Loc So Gio.xlsx
    18 KB · Đọc: 9
Chào các anh chị,
em có một file Chấm Công trong đó đã biết tổng số giờ rồi. Bây giờ em muốn lọc nó ra 1 sheet khác theo điều kiện cho trước (between) và hiển thị ra nhưng không biết cách nào cả.
anh/chị biết kết hợp hàm nào như trong file đính kèm giúp đỡ em với. Cái này có thể kết hợp hàm được không ah?
em có ghi chi tiết trong file rồi ah
Cảm ơn anh/chị nhiều
Để đơn giản mình dùng cột phụ thử xem.
 

File đính kèm

  • Loc So Gio.xlsx
    19.9 KB · Đọc: 15
Bạn xem file, xin mòi & mình xài UDF đó nha
 

File đính kèm

  • UDF.rar
    23.2 KB · Đọc: 9
Đó là hàm mảng tự tạo mà & nó đây:
PHP:
Function TKe(CT As String, Rng As Range)
 Dim J As Long, W As Integer, Rws As Long, fNum As Integer, lNum As Integer, VTr As Byte, Col As Integer
 Dim Cls As Range
 
 Rws = Rng.Rows.Count:                      lNum = 35
 ReDim Arr(1 To Rws, 1 To 2) As String
 VTr = InStr(CT, "-")
 If VTr Then
    fNum = CInt(Left(CT, VTr - 1)) - 1
    lNum = CInt(Mid(CT, VTr + 1, Len(CT)))
 Else
    VTr = InStr(CT, ">")
    fNum = CInt(Mid(CT, VTr + 1, Len(CT)))
 End If
 Col = Rng.Columns.Count
 For Each Cls In Rng(1).Resize(Rws)
    If Cls.Offset(, Col - 1) > fNum And Cls.Offset(, Col - 1) < lNum Then
        W = W + 1:                  Arr(W, 1) = Cls.Value
        Arr(W, 2) = Cls.Offset(, 1).Value
    End If
 Next Cls
 If W Then TKe = Arr()
End Function
Còn vẫn muốn xài nút lệnh thì nên là 1 ComboBox để chọn 1 trong 3 tiêu chí. Tuy nhiên làm như vậy chỉ là thêm bước mà thôi.
 
Để đơn giản mình dùng cột phụ thử xem.
Hồi nào tới giờ bạn có thấy thớt nào chấp nhận "đơn giản" chưa.
Diễn đàn này không phải là giúp đỡ trao đổi kiến thức công nghệ. Nó là diễn đàn viết code giùm, lập công thức giùm theo yêu cầu.
Muốn dụ thớt theo đề nghị của mình, bạn phải ra một công thức thật khủng cho nó có vẻ nguy hiểm.
 
Web KT
Back
Top Bottom