Xác nhận tổng số lượng xuất kho theo từng mã sản phẩm

[kokoro mitsubishi]

Chào cả nhà
em có một vấn đề mong cả nhà giúp đỡ:
Hàng tháng phải căn cứ vào lượng xuất của mã sản phẩm để tổng hợp vào 2 phiếu xuất :900 và 901
tuy nhiên hàng hóa xuất cho 2 mã này đôi khi có sự trùng khớp do có thể dùng chung mã đăng ký sản phẩm

em muốn có thể đua VBA để có thể lựa chọn mã 900 thì tất cả sản phẩm nào liên quan đến dòng 900 trích xuất ra được
và mã hàng đó sẽ tự động cộng tổng .

ví dụ mã bên dưới tự động tính là 6 cho dù được xuất 2 lần mỗi lần 3 cái

CCQC0001

Dao phay ngón phi 3

6

xin cảm ơn cả nhà

 

[be_09]

Chào cả nhà
em có một vấn đề mong cả nhà giúp đỡ:
Hàng tháng phải căn cứ vào lượng xuất của mã sản phẩm để tổng hợp vào 2 phiếu xuất :900 và 901
tuy nhiên hàng hóa xuất cho 2 mã này đôi khi có sự trùng khớp do có thể dùng chung mã đăng ký sản phẩm

em muốn có thể đua VBA để có thể lựa chọn mã 900 thì tất cả sản phẩm nào liên quan đến dòng 900 trích xuất ra được
và mã hàng đó sẽ tự động cộng tổng .

ví dụ mã bên dưới tự động tính là 6 cho dù được xuất 2 lần mỗi lần 3 cái

CCQC0001

Dao phay ngón phi 3

6

xin cảm ơn cả nhà

Dùng thử File
Thêm dữ liệu vào sheet DuLieu rồi vào D3 của sheet LocMa Gõ một mã sản phẩm và nhấn nút xem kết quả

 

[HUONGHCKT]

Chào cả nhà
em có một vấn đề mong cả nhà giúp đỡ:
Hàng tháng phải căn cứ vào lượng xuất của mã sản phẩm để tổng hợp vào 2 phiếu xuất :900 và 901
tuy nhiên hàng hóa xuất cho 2 mã này đôi khi có sự trùng khớp do có thể dùng chung mã đăng ký sản phẩm

em muốn có thể đua VBA để có thể lựa chọn mã 900 thì tất cả sản phẩm nào liên quan đến dòng 900 trích xuất ra được
và mã hàng đó sẽ tự động cộng tổng .

ví dụ mã bên dưới tự động tính là 6 cho dù được xuất 2 lần mỗi lần 3 cái

CCQC0001

Dao phay ngón phi 3

6

xin cảm ơn cả nhà

Góp vui.
Xem file. Hãy thử thêm, bớt, thay đổi Dữ liệu và nhấn nút TỔNG HỢP ở sh TongHop
Cột ngày tháng sẽ liệt kê bao nhiêu lần lấy cùng một SP (ngày lấy cụ thể); cột người lấy sẽ có tên người lấy tương ứng.

 

[kokoro mitsubishi]

Góp vui.
Xem file. Hãy thử thêm, bớt, thay đổi Dữ liệu và nhấn nút TỔNG HỢP ở sh TongHop
Cột ngày tháng sẽ liệt kê bao nhiêu lần lấy cùng một SP (ngày lấy cụ thể); cột người lấy sẽ có tên người lấy tương ứng.

Cảm ơn bạn đúng theo mình mong muốn

 

[Ba Tê]

Góp vui.
Xem file. Hãy thử thêm, bớt, thay đổi Dữ liệu và nhấn nút TỔNG HỢP ở sh TongHop
Cột ngày tháng sẽ liệt kê bao nhiêu lần lấy cùng một SP (ngày lấy cụ thể); cột người lấy sẽ có tên người lấy tương ứng.

Chỉ là góp ý chứ không nói đúng sai nhé.

For i = 1 To R
    If Arr(i, 3) = Sheets("TongHop").Range("C2") Then

Cái Sheets("TongHop").Range("C2") nên gán cho nó vào 1 biến MaSP hay gì gì... đó.
Nếu R đến hàng ngàn dòng, code không cần phải tìm lại giá trị trên sheet của Sheets("TongHop").Range("C2") hàng ngàn lần

 

[HUONGHCKT]

Chỉ là góp ý chứ không nói đúng sai nhé.

For i = 1 To R
    If Arr(i, 3) = Sheets("TongHop").Range("C2") Then

Cái Sheets("TongHop").Range("C2") nên gán cho nó vào 1 biến MaSP hay gì gì... đó.
Nếu R đến hàng ngàn dòng, code không cần phải tìm lại giá trị trên sheet của Sheets("TongHop").Range("C2") hàng ngàn lần

Cảm ơn Anh đã xem bài và chỉ bảo. Tôi lại có thêm 1 kinh nghiệm nữa rồi.
Trân trọng!

 

[VetMini]

Loại vấn đề này đáng ra phải giải quyết bằng Pivot Table và Filters.
Nó rắc rối là do tổ chức dữ liệu kém tư duy. Đem VBA để khoả lấp lỗi kém tư duy là lỗi này chồng chất lên lỗi kia.

Toi chỉ giải thích cho các bạn khác, khong ngại phát triển tư duy phân tích dữ liệu thôi. Những người nghĩ rằng file của mình không có cửa để sửa đổi không cần biện hộ với tôi.

 

[Maika8008]

Lính chữa cháy đâu có sửa được nhà của khổ chủ để tránh nó cháy đâu bác.

 

[VetMini]

Lính chữa cháy đâu có sửa được nhà của khổ chủ để tránh nó cháy đâu bác.

Tôi biết, bạn biết: họ làm bộ như bất lực để che đậy cái gì đó thôi.
Chứ nơi chức năng thì họ còn vòi [tiền phạt,...] nữa là khác.