BOM分解计算需求

chengw823

求各位老师帮忙，根据第一个“BOM表”和第二个“成品”计算出每个成品对应的部品需求，放在第三个表“需求”中，“BOM表”大概有20万行，附件只是一小部分，父子关系有多层，层数不知，需要拆分到最后一层部品的需求，最好能够快速拆解计算；希望各位老师能帮弟子这个忙，弟子在此谢谢。
例如：
父级   子级   用量
A       A1      1
A       A2      2
A       A3      1
A2      B1      1
B       B1      1
B       B3      1
B       B4      2  
B1      B2      1

物料    数量
A        20
B        30
需求计算
父级   子级   用量   成品数量   部品数量
A       A1     1        20         20
A       B2     2        20         40
A       A3     1        20         20
B       B2     1        30         30
B       B3     1        30         30
B       B4     2        30         60

yjh_27

参见附件。

chengw823

yjh_27 发表于 2015-12-15 21:51
参见附件。

谢谢2楼老师，虽然计算出来，但不是我想的那种结果，我想要的是例子的那种结果

yjh_27

chengw823 发表于 2015-12-16 12:58
谢谢2楼老师，虽然计算出来，但不是我想的那种结果，我想要的是例子的那种结果

sub aa中的
crr = BOMOrder(arr, brr, , , 1, 2, , , , , 2)
改为
crr = BOMOrder(arr, brr, , , 1, 2, , , , , 0)

chengw823

yjh_27 发表于 2015-12-16 13:41
sub aa中的
crr = BOMOrder(arr, brr, , , 1, 2, , , , , 2)
改为

老师，还是有一点小问题，半成品没有直接拆开，而是在父级下面，我想要的是第一列全部是成品，第二列有半成品的拆成子部品放第二列，第三列是部品最终用量，第四列成品数量

chengw823

yjh_27 发表于 2015-12-16 13:41
sub aa中的
crr = BOMOrder(arr, brr, , , 1, 2, , , , , 2)
改为

我的意思是第一列只显示完成品，半成品不要，第二列显示部品，有半成品的继续折分到部品再显示，第三列最终子部品用量，第四列完成品数量，第五列只是公式，第三列*第四列，请老师再帮帮忙改改，弟子在此谢谢了！！！！

yjh_27

chengw823 发表于 2015-12-16 16:42
我的意思是第一列只显示完成品，半成品不要，第二列显示部品，有半成品的继续折分到部品再显示，第三列最 ...

模式4是你需要的

chengw823

先谢谢老师帮忙，我有时间就回去试试

chengw823

yjh_27 发表于 2015-12-17 13:31
模式4是你需要的

需求满足，经测试OK，不过代码写得有点多，我都看晕了，如果能简单一点就好，还是不麻烦老师了，能用就行，谢谢老师！！！

yjh_27

看懂模块1即可，其他模块是通用自定义函数，各自用途见注释。