Nhờ giúp đỡ về thời gian lưu kho (1 người xem)

[chiendich]

Nhờ các anh chị giúp em hoàn thiện báo cáo này với!.
Em có một báo cáo NXT. do nhu cầu phải theo dõi thời gian lưu kho để biết hàng nào tồn kho dài ngày để quản lý riêng. file này bác Ba Tê đã viết code NXT cho em chạy rất tốt, bây giờ phát sinh thêm về thời gian lưu kho: cách tính được em giải thích ở Sheet BCCT! rất mong các anh chỉ giúp em hoàn thiện, em xin trân trọng cảm ơn! file đính kèm

 

[Ba Tê]

Nhờ các anh chị giúp em hoàn thiện báo cáo này với!.
Em có một báo cáo NXT. do nhu cầu phải theo dõi thời gian lưu kho để biết hàng nào tồn kho dài ngày để quản lý riêng. file này bác Ba Tê đã viết code NXT cho em chạy rất tốt, bây giờ phát sinh thêm về thời gian lưu kho: cách tính được em giải thích ở Sheet BCCT! rất mong các anh chỉ giúp em hoàn thiện, em xin trân trọng cảm ơn! file đính kèm

Chỉ tính thời gian lưu kho, còn chuyện cảnh báo thế nào thì bạn tự giải quyết nhé.

 

[chiendich]

Chỉ tính thời gian lưu kho, còn chuyện cảnh báo thế nào thì bạn tự giải quyết nhé.

Thầy ơi! thầy có thể chỉnh lại giúp em với : Nếu trong thời gian báo cáo đó mà không phát sinh tăng, và cũng không phát sinh giảm mà còn tồn kho thì mới hiển thị số tháng lưu kho. còn có phát sinh bình thường và không còn tồn kho thì không tính.
Em xin cảm ơn Thầy!

 

[Ba Tê]

Thầy ơi! thầy có thể chỉnh lại giúp em với : Nếu trong thời gian báo cáo đó mà không phát sinh tăng, và cũng không phát sinh giảm mà còn tồn kho thì mới hiển thị số tháng lưu kho. còn có phát sinh bình thường và không còn tồn kho thì không tính.
Em xin cảm ơn Thầy!

Thêm 3 dòng lệnh trước khi gán dữ liệu xuống sheet:

For I = 1 To K
    If (dArr(I, 12) + dArr(I, 16))> 0 Or dArr(I, 20) = 0 Then dArr(I, 6) = Empty
Next I
[A6].Resize(K, 25) = dArr  'Thêm 3 dòng trên dòng này'

 

[chiendich]

Thêm 3 dòng lệnh trước khi gán dữ liệu xuống sheet:

For I = 1 To K
    If (dArr(I, 12) + dArr(I, 16))> 0 Or dArr(I, 20) = 0 Then dArr(I, 6) = Empty
Next I
[A6].Resize(K, 25) = dArr  'Thêm 3 dòng trên dòng này'

Dạ em cảm ơn Thầy rất nhiều! chúc Thầy sức khỏe. rất mong được gặp Thầy trong thời gian gần nhất!

 

[chiendich]

Thầy ơi! code (Nếu trong thời gian báo cáo đó mà không phát sinh tăng, và cũng không phát sinh giảm mà còn tồn kho thì mới hiển thị số tháng lưu kho. còn có phát sinh bình thường và không còn tồn kho thì không tính) chạy rất mượt! em cảm ơn thầy rất nhiều.
Nhưng Thầy ơi! đối với những loại mà Empty (For I = 1 To K If (dArr(I, 12) + dArr(I, 16))> 0 Or dArr(I, 20) = 0 Then dArr(I, 6) = Empty).
Trong các hàng đó nếu mặt hàng nào còn tồn kho thì bác có thể lấy ngày nhập gần nhất để tính thời gian lưu kho, và nếu trong kỳ không nhập mà có xuất thì vẫn được tính thời gian lưu kho , còn lại nếu tồn kho hết thì không tính.
rất mong gặp thầy ngày 1/7/2018 (SN/12 GFE)!