求助，如何用VBA按数量分摊

z0ching · 发表于 2023-2-13 09:23

本帖最后由 z0ching 于 2023-2-13 11:20 编辑

如图中例，左表拷贝纸的数量是87669，属于8万至9万的区间，这87669就要按10份进行分摊，分摊结果显示如右表N29:N38，分摊后单价与左表一致，金额等于数量乘单价。
想用VBA实现：当左表数量属于某一区间，拆分成该区间设定的份数；拆分后金额等于数量乘单价；根据入仓日，出仓日期随机生成。
谢谢高手谢谢各位大师！

chxw68 · 发表于 2023-2-13 09:30

分摊数量不是平均数，这个是怎么计算的？

z0ching · 发表于 2023-2-13 09:48

chxw68 发表于 2023-2-13 09:30
分摊数量不是平均数，这个是怎么计算的？

比如拷贝纸87669，要分成10份，因为每份数量不能一样，就先取8700，剩下669随机分成10份分别加进去

grf1973 · 发表于 2023-2-13 10:14

请看附件。

z0ching · 发表于 2023-2-13 10:44

grf1973 发表于 2023-2-13 10:14
请看附件。

可以运行，非常感谢老师

		自动登录	找回密码
密码			免费注册

[已解决] 求助，如何用VBA按数量分摊

评分