Tự tạo công thức tính giá xuất kho theo phương pháp FIFO – Phần 3

Sau khi chúng ta đã nắm được quy trình tính toán theo phương pháp FIFO, chúng ta có thể vận dụng những nội dung đó để xây dựng thành câu lệnh VBA giúp tính giá xuất kho theo phương pháp này.

Viết Macro tính giá xuất kho theo phương pháp FIFO

Chúng ta áp dụng vào bảng tính mẫu như sau:

Trong ví dụ này, chúng ta có nhiều lần nhập theo các ngày khác nhau trong bảng kê nhập kho

Trong Bảng kê xuất kho, có 5 lần xuất. Tính giá trị xuất kho cho từng lần xuất

Cách làm:

Trong ví dụ trên, chúng ta có các cột:

• Cột Số lượng nhập = cột C
• Cột Đơn giá nhập = cột D
• Cột Số lượng xuất kho = cột H
• Cột Giá trị xuất kho = thành tiền = cột I

Dựa theo quy trình đã tìm hiểu ở bài trước, chúng ta xây dựng câu lệnh VBA căn cứ theo các dữ liệu ở trên như sau:

Chạy thử câu lệnh trên, chúng ta có kết quả:

Chúng ta có thể kiểm tra lại như sau:

Lần 1: Xuất 50 cái, theo lần nhập đầu tiên, đơn giá 100 => Thành tiền 50 * 100 = 5.000 Kết quả đúng

Lần 2: Xuất 200 cái

• Theo lần nhập đầu tiên còn 50 cái, đơn giá 100 = 50 * 100 = 5.000
• Theo lần nhập thứ hai sẽ xuất 200-50 = 150 cái (còn dư 50 cái), đơn giá 120 = 150 * 120 = 18.000
• Tổng cộng là 18.000 + 5.000 = 23.000 Kết quả đúng

Lần 3: Xuất 100 cái

• Theo lần nhập thứ hai còn 50 cái, đơn giá 120 = 50 * 120 = 6.000
• Theo lần nhập thứ ba sẽ xuất 100 – 50 = 50 cái (còn dư 70 cái), đơn giá 110 = 50 * 110 = 5.500
• Tổng cộng là 6.000 + 5.500 = 11.500 Kết quả đúng

Tương tự chúng ta xét các lần nhập sau.

Như vậy bằng cách sử dụng VBA chúng ta đã có thể viết được câu lệnh Macro giúp tự động tính giá trị xuất kho theo phương pháp FIFO được rồi.

Tải về file mẫu: https://drive.google.com/open?id=1AKoTj6NVlks1vXkMfOOgRLjcY4K_U-X9

Chúc các bạn học tốt cùng Học Excel Online!