|
VBA初心者です。
職場で以下の材料費内訳表が必要です。類似サンプルを探しましたが見つからず、自力ではどうにもできないので良い方法があれば教えてください。よろしくお願いします。
購入部品一覧と使用部品一覧があり、同じ部品番号を複数の注文番号で購入しています。また、使用部品一覧では異なる号機で同じ部品を使用しています。使用部品一覧をベースに購入数を購入部品一覧から振り分ける作業を行い、材料費内訳表を作成したいのです。使用数に対し、購入数の方が多ければその数量を、不足であればマイナスを余剰欄へ表示。同じ部品番号であれば、注文番号は順不同です。
実際のデータは号機は10種、部品の種類は1000種ほど、使用部品一覧は4000行ほどあり、手作業で一週間かけて行っています。
sheet1(購入部品一覧)
A B C
1 部品番号 注文番号 購入数
2 0101aaa A0001 10
3 0101aaa A0002 10
4 0101aaa A0003 10
5 0202bbb A0004 5
6 0202bbb A0005 15
sheet2(使用部品一覧)
A B C
1 号機 部品番号 使用数
2 1 0101aaa 7
3 2 0101aaa 14
4 3 0101aaa 9
5 1 0202bbb 3
6 2 0202bbb 2
7 3 0202bbb 10
sheet3(材料費内訳表)
A B C D E F
1 号機 部品番号 使用数 注文番号 購入数 余剰
2 1 0101aaa 7 A001 7
3 2 0101aaa 14 A001 3
4 2 0101aaa A002 10
5 2 0101aaa A003 1
6 3 0101aaa 9 A003 9
7 1 0202bbb 3 A004 3
8 2 0202bbb 2 A004 2
9 3 0202bbb 10 A005 10 5
|
|