Inventory Valuation

Hi All,

Finally, a friend of mine put together a code for inventory valuation based on FIFO. In the attached data the purchases are listed on PO_Data sheet & Inventory on hand is on Inventory sheet.
The idea is - Code checks one item of inventory, on hand qty is matched against last received PO and decending order then a weighted average is computed and noted in the WTD_FOB_PRICE.
Problem (1) now is - The code exits after 3 items computed.
Second thing needs to be done - I need to find cost of goods sold for each customer. A sales details sheet is attached with items sold and rate info etc.
How can I fix problem # 1 & achieve COGS. Below is the code :
I am neither a VB nor an Excel guy... Please help..

Class Module # 1 -

Please Login or Register  to view this content.

Class - Module # 2

Please Login or Register  to view this content.

Please change the PHP tags to CODE tags.

Thanks.

Your code modules are not Class modules.

Fio is best calculated using a User Defined Functions, search the Forum for examples o here's a template here

http://excel-it.com/workbook_downloads.htm

If you set your Sales sheet as a proper Excel Table you could use a Pivottable for getting Customer data. The table should have a Header Row and no completely empty Rows or colmns between data.