本文介绍如何使用VBA解决先进先出的库存成本计算问题。当每批次采购价格不同时，根据月末库存数量和历史采购记录，按照先进先出原则计算期末库存总成本。例如，A产品在12月有三批入库，价格分别为1元、2元、3元，出库18个，最终库存12个，成本为34元。通过VBA编写代码，能自动提取不重复的库存产品到期末成本表，并计算出每个产品的成本。
目的要求：
1.月末盘点了库存数量
2.配合上之前的采购单（采购量以及采购单价）
3.按照先进先出的准则
比如A产品，12月入库了三批各10个，价格分别为1元、2元、3元，12月出库了18个，月底库存剩下12（2个价格是2元，10个价格是3元）个，结存的库存成本应该是34元（2*2+10*3）
求助人想要的是以函数公式的方法达到如上效果，但是因为我的函数公式没有想到比较好的方法，所以我用VBA做的相同的效果函数公式还是不太熟练呀(ಥ_ಥ)
根据求助人提供的数据如下：
然后根据库存记录里面的数据，和期末成本里面的期末库存的数量，我写出了如下代码，
这个代码实现的功能是将库存记录里面的产品行列的数据，不重复的提取到期末成本中的A列，这样可以避免当有新产品入库的时候的复制粘贴。
需求是先进先出&#x
最低0.47元/天 解锁文章
扫一扫
2739
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
