Tính tổng 2 điều kiện (1 người xem)

[congtuthich]

em có 1 bài toán cần các bác giải quyết giúp . mọi y/c đã được viết trong sheet TH

 

[ndu96081631]

hỏi cách lập công thức tính

Theo mô tả trong file thì bài toán này gọi là: TÍNH TỔNG 2 ĐIỀU KIỆN, hợp lý chứ?
Lần sau phải đặt tiêu đề cho sát với nội dung cần hỏi nhé! Viết chung chung theo kiểu "hỏi cách lập công thức tính" sẽ bị xóa bài
----------------------------------
Yêu cầu của bạn có thể dùng SUMIFS như sau:

=SUMIFS(CT!$D$2:$D$50000,CT!$A$2:$A$50000,B$4,CT!$C$2:$C$50000,$A5)

Công thức trên được gõ tại cell B5 của sheet TH. Gõ xong công thức, kéo fill sang phải và xuống dưới

 

[congtuthich]

em còn bài này nhơ bác tính giúp nhé . nếu ở cột B mà có từ 2 số trở lên giống nhau mà trong cột A có khoảng thời gian ( tính bằng phút ) <= 5 phút thì được lọc ra . VD em đã bôi đỏ .

 

[congtuthich]

không có ai giúp em ah?

 

[NguyenThien Nhan]

Cột màu vàng lọc chữ "d" ra được kết quả. Không biết có đúng ý bạn không

 

[Let'GâuGâu]

em còn bài này nhơ bác tính giúp nhé . nếu ở cột B mà có từ 2 số trở lên giống nhau mà trong cột A có khoảng thời gian ( tính bằng phút ) <= 5 phút thì được lọc ra . VD em đã bôi đỏ .

Nếu chỉ trùng 2 lần thì bạn có thể xầi thử
nếu trùng nhiều lần tôi nghĩ là bạn phải xài vba

C2=IF(COUNTIF($B$2:$B$8676,B2)=2,IF(MINUTE(ABS(LOOKUP(2,1/($B$2:$B$8676=B2)/($A$2:$A$8676<>A2),$A$2:$A$8676)-A2))<=5,"NO DAY",""),"")

 

[Let'GâuGâu]

làm thử bằng code, mất hết khoảng 1 phút để chạy khoảng 8 ngàn dòng số liệu,
chưa có cách nào nhanh hơn....hichic

Sub XeTrung()
Dim SLNg, tam1, tam2, v1, v2 As Variant, i, j, k As Long, KQ()
SLNg = [A2].Resize([A10000].End(3).Row, 2).Value
ReDim KQ(1 To UBound(SLNg), 1 To 1)
For i = 1 To UBound(SLNg)
If IsEmpty(KQ(i, 1)) Then
tam1 = Split(SLNg(i, 2), ".")
For j = i + 1 To UBound(SLNg)
If Abs((SLNg(j, 1) - SLNg(i, 1)) * 24 * 60) <= 5 Then
tam2 = Split(SLNg(j, 2), ".")
    For Each v1 In tam1
        For Each v2 In tam2
            If Trim(v1) = Trim(v2) Then
                KQ(i, 1) = v1
                KQ(j, 1) = v1
                Exit For
            End If
        Next
    Next
End If
Next
End If
Next
[c2:c10000].ClearContents
[c2].Resize(UBound(SLNg)).Value = KQ
End Sub

 

[ndu96081631]

em còn bài này nhơ bác tính giúp nhé . nếu ở cột B mà có từ 2 số trở lên giống nhau mà trong cột A có khoảng thời gian ( tính bằng phút ) <= 5 phút thì được lọc ra . VD em đã bôi đỏ .

Ủa! Vậy bài này liên quan gì đến chủ đề TÍNH TỔNG hả bạn?
Đăng bài phải đúng nơi đúng chỗ, không thể "nhân tiện" rồi "hỏi ké" thế nhé

 

[congtuthich]

thank bác [h=2]Let'GâuGâu[/h]nhé đúng ý em rồi