Tính tổng xuất của tất cả mã hàng

[mandala]

Bài toán có 2 sheet:
Kho_PhoVong
Nhap_Xuat
tại sheet Nhap_Xuat tiến hành nhập dữ liệu (ở đây tôi đã nhập sẵn)
tại sheet Kho_PhoVong yêu cầu:
Tính tổng Xuất của mã hàng

Đề Bài:
Nhập dư liêu cho sheet Nhap_Xuat

10/09/2018 4076 Bùi Thanh Huyền EFC-114 11
10/09/2018 4077 Bùi Thanh Huyền EFC-114 11
15/09/2018 4080 Lương Văn Hùng EFC-114 18
Ví dụ: mã hàng 114 tổng xuất ra 50 bộ

Câu hỏi:
tại sheet Kho_PhoVong
tính Tổng Xuất của tất cả mã hàng nếu chưa xuất để mặc định số 0
File excel gủi kèm mật khẩu
mật khẩu: 25251325109
Xin mọi người giúp đỡ & xin cảm ơn!
chúc mọi người có một ngày vui vẻ!

 

[Nguyễn Hồng Quang]

Bài toán có 2 sheet:
Kho_PhoVong
Nhap_Xuat
tại sheet Nhap_Xuat tiến hành nhập dữ liệu (ở đây tôi đã nhập sẵn)
tại sheet Kho_PhoVong yêu cầu:
Tính tổng Xuất của mã hàng

Đề Bài:
Nhập dư liêu cho sheet Nhap_Xuat

10/09/2018 4076 Bùi Thanh Huyền EFC-114 11
10/09/2018 4077 Bùi Thanh Huyền EFC-114 11
15/09/2018 4080 Lương Văn Hùng EFC-114 18
Ví dụ: mã hàng 114 tổng xuất ra 50 bộ

Câu hỏi:
tại sheet Kho_PhoVong
tính Tổng Xuất của tất cả mã hàng nếu chưa xuất để mặc định số 0
File excel gủi kèm mật khẩu
mật khẩu: 25251325109
Xin mọi người giúp đỡ & xin cảm ơn!
chúc mọi người có một ngày vui vẻ!

D13=SUMIFS(Nhap_Xuat!$G$12:$G$999;Nhap_Xuat!$E$12:$E$999;Kho[@[Mã hàng]]). Copy paste các ô còn lại của sheet Phố Vọng
Nhưng chẳng hiểu bạn tính thế nào ra 50 =11+11+18, phải chăng 1+1=3!!!!
Bài toán khó nha, xem lời giải ở đây
https://hoc247.net/hoi-dap/toan-6/chung-minh-1-1-3-faq189733.html

 

[mandala]

D13=SUMIFS(Nhap_Xuat!$G$12:$G$999;Nhap_Xuat!$E$12:$E$999;Kho[@[Mã hàng]]). Copy paste các ô còn lại của sheet Phố Vọng
Nhưng chẳng hiểu bạn tính thế nào ra 50 =11+11+18, phải chăng 1+1=3!!!!
Bài toán khó nha, xem lời giải ở đây
https://hoc247.net/hoi-dap/toan-6/chung-minh-1-1-3-faq189733.html
Ví dụ: Mã hàng 114 nhập: 11+11+18=40
( có thể tôi đã xóa đi một dòng xin lỗi vấn đế này vì đưa thông tin không chính xác)

Tại sheet Kho_PhoVong tính lấy giá trị số 40 này (tôi cần công thức hoặc code vbe cho vẫn đế này)
Mở rộng vấn đề lấy giá trị cho tất cả mã hàng
ps: xin cảm ơn, chúc bạn một buổi tối vui vẻ!

 

[Nguyễn Hồng Quang]

View attachment 215063

Công thức bạn xem lại #2 phần bôi đậm tôi đã làm sumifs

 

[mandala]

Công thức bạn xem lại #2 phần bôi đậm tôi đã làm sumifs

cảm ơn bạn nhiều !

 

[Ba Tê]

Bài toán có 2 sheet:
Kho_PhoVong
Nhap_Xuat
tại sheet Nhap_Xuat tiến hành nhập dữ liệu (ở đây tôi đã nhập sẵn)
tại sheet Kho_PhoVong yêu cầu:
Tính tổng Xuất của mã hàng

Đề Bài:
Nhập dư liêu cho sheet Nhap_Xuat

10/09/2018 4076 Bùi Thanh Huyền EFC-114 11
10/09/2018 4077 Bùi Thanh Huyền EFC-114 11
15/09/2018 4080 Lương Văn Hùng EFC-114 18
Ví dụ: mã hàng 114 tổng xuất ra 50 bộ

Câu hỏi:
tại sheet Kho_PhoVong
tính Tổng Xuất của tất cả mã hàng nếu chưa xuất để mặc định số 0
File excel gủi kèm mật khẩu
mật khẩu: 25251325109
Xin mọi người giúp đỡ & xin cảm ơn!
chúc mọi người có một ngày vui vẻ!

Dữ liệu lớn nên dùng VBA.

Public Sub sGpe()
Dim Dic As Object, sArr(), dArr(), I As Long, R As Long, Txt As String
Set Dic = CreateObject("Scripting.Dictionary")
With Sheets("Nhap_Xuat")
    If .Range("G50000").End(xlUp).Row = 11 Then Exit Sub
    sArr = .Range("E12", .Range("G50000").End(xlUp)).Value
End With
    R = UBound(sArr)
    For I = 1 To R
        Dic.Item(sArr(I, 1)) = Dic.Item(sArr(I, 1)) + sArr(I, 3)
    Next I
With Sheets("Kho_PhoVong")
    If .Range("A50000").End(xlUp).Row = 12 Then Exit Sub
    sArr = .Range("A13", .Range("A50000").End(xlUp)).Resize(, 3).Value
    R = UBound(sArr)
    ReDim dArr(1 To R, 1 To 2)
    For I = 1 To R
        Txt = sArr(I, 1)
        dArr(I, 1) = 0
        If Dic.Exists(Txt) Then
            dArr(I, 1) = Dic.Item(Txt)
        End If
        dArr(I, 2) = sArr(I, 3) - dArr(I, 1)
    Next I
    .Range("D13").Resize(R, 2) = dArr
End With
Set Dic = Nothing
End Sub