VBA 複数ファイルの同じ項目を一行に合計したいです

Question

VBAを使って、2つのファイルで、複数項目が同じものを他のファイルに一行にまとめたいです。

具体的には、ファイル①と②で、売上月と商品名が同じものを③のような形にしたいです。
「23年10月に／営業1部門の／購買チームが／りんごを／700円売上げ／出荷準備中が1件／出荷済が1件」という内容です。
想定としては、ファイル③でマクロを実行すると、①と②を開いて、上記処理をするというように考えております。

調べてもなかなかできずに困っております。。
お力をいただけると大変助かります。何卒よろしくお願いいたします。

①ファイル名：Book1
●シート名：売上明細
　　A列　　B列　　C列　　D列　　　　E列　　　F列
1　売上月　部門　チーム　商品コード　商品名　合計金額
2　2310　 営業1　購買　　1212　　　りんご　100
3　2310　 営業1　購買　　1212　　　りんご　600
4　2311　 営業1　購買　　1212　　　りんご　200
5　2311　 営業2　販売　　1213　　　みかん　300

②ファイル名：Book2
●シート名：進捗状況
　　A列　　　　B列　　C列
1　進捗状況　　売上月　商品名
2　出荷準備中　2310　　りんご
3　出荷済　　　2310　　りんご
4　確認中　　　2311　　りんご
5　確認中　　　2311　　みかん

③ファイル名：一覧表
●シート名：Sheet1
上記2つの内容を、以下のように1つにまとめたいです。
　　A列　　B列　　C列　　D列　　　　E列　　　F列　　　G列　　H列　　　　I列
1　売上月　部門　チーム　商品コード　商品名　合計金額　確認中　出荷準備中　出荷済
2　2310　 営業1　購買　　1212　　　りんご　700　　　　0　　　1　　　　　1
3　2311　 営業1　購買　　1212　　　りんご　200　　　　1　　　0　　　　　0
4　2311　 営業2　販売　　1213　　　みかん　300　　　　1　　　0　　　　　0

tatsumaru77 · Accepted Answer

下記URLにアップしました。
https://ideone.com/HwqSKb

tatsumaru77 · Answer

追伸：
No3です。
以下のようなデータはエラーとしています。
エラーケース１
売上明細
　　売上月　部門　チーム　商品コード　商品名　合計金額
①　2310　 営業1　購買　　1212　　　りんご　100
②　2310　 営業2　販売　　1212　　　りんご　600

上記の場合、②はエラーとなります。
理由：進捗状況の出荷準備中　2310　　りんご を
①に割り当てるか、②に割り当てるか判断ができない為

エラーケース２
進捗状況が、出荷準備中、出荷済、確認中の何れでもないもの

tatsumaru77 · Answer

No1です。
質問をよく見ていませんでした。No1の補足要求は、取り消します。
あらためて、補足要求を行います。
１．ファイルの拡張子の確認です。
①のファイル名は、Book1.xlsx
②のファイル名は、Book2.xlsx
であってますか。

２．フォルダの確認です。
①、②のファイルは、③のファイルと同じフォルダ内に格納されていますか。それとも別のフォルダですか。

tatsumaru77 · Answer

補足要求です。
１．マクロはどのブックに格納するのでしょうか。
上記の３つのブックのいずれかですか。そうであれば、そのブック名を提示してください。それとも、上記の３つ以外でしょうか。
が考えられます。

２．上記の３つのブックの拡張子は何でしょうか。

３．上記の３つのブックは、予めオープンされている前提なのでしょうか。
それとも、オープンするところから開始するのでしょうか。その場合、３つのブックは、同じフォルダー内に格納されているのでしょうか。それとも別々のフォルダー内に格納されているのでしょうか。

VBA 複数ファイルの同じ項目を一行に合計したいです

下記URLにアップしました。

追伸：

No1です。

補足要求です。

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング