Bài toán khó: Quản lý NXT cho quá trình sản xuất thành phẩm có tỉ lệ hao hụt. (1 người xem)

[luanvien177]

Thân chào diễn đàn GPE,
Em biết vấn đề này lẽ ra nên post ở chủ để Excel và Kế toán.
Nhưng em xin post ở đây để mong các anh chị góp ý về code trong file của em nhiều hơn.

Vấn đề của em:

1. Mỗi thành phẩm (MASP) được chế biến từ một Nguyên liêu thô (MaNL) có Định mức và tỉ lệ hao hụt khác nhau. Có thể nhiều sản phẩm được chế biến từ cùng 1 Nguyên liệu thô.
2. Các mặt hàng chia ra 3 loại: phân phối, chế biến, nguyên vật liệu. (Phân phối: mua đi bán lại - Chế biến: mua rồi chế biến ra thành phẩm có hao hụt - NVL: mua NL thô bán NL thô)
3. Khi nhập hàng vào tính bằng đơn vị Kg (kilogram). Khi xuất hàng tính bằng đơn vị: gói, hộp, hủ... (có trọng lượng tịnh khác nhau)

Cách giải quyến của em:

• Em tạo ra bảng Table để qui ra một Định mức + Tỉ lệ hao hụt riêng biệt cho mỗi thành phẩm khác nhau.
• Thành phẩm quản lý theo cột, Nguyên liệu thô quản lý theo hàng ngang. (để tiện quản lý cho những trường hợp: nhiều thành phẩm cùng tạo ra từ 1 loại nguyên liệu)
• Tồn DK: quản lý cho 3 mặt hàng riêng biệt (Phân phối, chế biến, NVL)
  • Phân phối: (chỉ là mua đi bán lại) nên sẽ cộng theo đơn vị: gói, hộp (căn cứ theo trọng lượng tịnh)
  • Chế biến + NVL: sẽ quản lý theo Kg. Ta sẽ qui đổi ra Kg rồi cộng lại theo số lượng qui đổi cho từng thành phẩm
• Nhập: quản lý theo đơn vị Kg.
• Xuất: phải qui đổi từ trọng lượng tịnh ra Kg và nhân với định mức + tỉ lệ hao hụt khác nhau. (vấn đề rắc rối tại sheet XUAT này xảy ra)

Rắc rối gặp phải:

• Khi dò tìm từ cột tên sản phẩm để ra MASP và nhân với định mức + tỉ lệ hao hụt em thấy không đúng
• Khi sử dụng sự kiện Worksheet_change thì VBA báo lỗi
• Nếu có thể thay đổi từ Worksheet_change thành 1 Module thì được không mấy anh chị??

Bài toán này: em đã post 1 lần tại Box Excel và Kế toán nhưng bị trôi bài hơn 1 năm nay.
http://www.giaiphapexcel.com/forum/showthread.php?97620-T%C3%ADnh-nh%E1%BA%ADp-xu%E1%BA%A5t-t%E1%BB%93n-cho-h%C3%A0ng-nh%E1%BA%ADp-nguy%C3%AAn-v%E1%BA%ADt-li%E1%BB%87u-s%E1%BA%A3n-xu%E1%BA%A5t-s%E1%BA%A3n-ph%E1%BA%A9m/page8
Nên em xin gửi lại file, mong các anh chị giải đáp thắc mắc này giùm em.
Vì tất cả các code là do em từ mày mò và học hỏi trên diễn đàn chứ em ko có căn bản VBA, nên mong anh chị góp ý về Code cho mượt mà hơn.
Tiện đây em xin đính kèm file theo link bên dưới:
http://www.fshare.vn/file/4DB7RX7S7DW6