Cần hỗ trợ xử lý hiện ngày sản phẩm bằng VBA

[sonminhtran]

Vui lòng hỗ trợ hiện dữ liệu thông tin 'date sản phẩm' theo như file đính kèm có 2 Sheet:
Sheet 'Temp' cần hiện thông tin như yêu cầu bên dưới từ ô AB4 trở xuống dựa theo các điều kiện dò tìm tham chiếu ở Sheet 'TON'

Điều kiện 1: Dò tên mã hàng cột X của Sheet Temp tham chiếu Sheet 'TON' theo tên hàng cột F với điều kiện cột R >= 0.5 (nếu nhỏ hơn 0.5 thì không lấy dữ liệu). Nếu thỏa điều kiện >= 0.5sau đó lấy dữ liệu cột I Sheet 'TON' và hiện dữ liệu ra ở Sheet 'Temp' Cột AB4 trở xuống
Điều kiện 2: Nếu số lượng Sheet 'TON' của cột O = 0 (dò tên mã hàng cột F giống tên mã hàng Sheet 'Temp' cột X thì không hiển thị dữ liệu trong Sheet 'Temp' ở Cột AB4 trở xuống
Điều kiện 3: Nếu số lượng Sheet 'TON' của cột O < cột Z Sheet 'Temp' (dò tên mã hàng cột F giống tên mã hàng Sheet 'Temp' cột X) thì ở Sheet 'Temp' sẽ chèn thêm 1 dòng dữ liệu giống như dòng trên nhưng lấy ngày tiếp theo dựa theo Sheet 'TON' cột I
Ví dụ cho điều kiện 3: Nếu số lượng Sheet 'Temp' cột Z4 = 2 mà số lượng tồn ở Sheet 'TON' = 1 thì sẽ lấy dữ liệu cột I
Hoặc: : Nếu số lượng Sheet 'Temp' cột Z4 = 2 mà số lượng tồn ở Sheet 'TON' = 1 thì sẽ lấy dữ liệu cột I dòng trên + dòng dưới để thỏa điều kiện = số lượng cột Z4 trở xuống của Sheet 'Temp'

Xin cảm ơn