エクセルVBAで表の合体をさせたい。
エクセルにVBAってのがあると知って勉強を始めたばかりの者です。よろしくお願いいたします。
VBAで次のようなことをしたいのですが、いい方法が思いつきません。VBAに詳しい方教えて頂けないでしょうか?
シートが2枚あります。
1つのシートには、
A-101, , ,あ1
A-102, , ,
A-103, , ,あ2
というデーターが書き込まれています。
2つ目のシートには、
A-101-1, ,
A-101-2, ,
A-101-3, ,
A-102-1, ,
A-102-2, ,
A-103-1, ,
A-103-2, ,
A-103-3, ,
A-103-4, ,
と書き込まれています。
そこで、
A-101-1, ,あ1
A-101-2, ,あ1
A-101-3, ,あ1
A-102-1, ,
A-102-2, ,
A-103-1, ,あ2
A-103-2, ,あ2
A-103-3, ,あ2
A-103-4, ,あ2
というふうに合体させたいのですが、いい方法ないでしょうか?
一つ目のループは、4列めのセルにデータが書き込まれているかを調べて書き込まれていたら、
1列目のセルの値が含まれる2枚目のシートのセルを全てループし、該当するものがあれば書き込むって
感じかなぁ?と思うのですが、実現には、単純にループを行う力業しかないのでしょうか?
いい案があれば、教えてください。宜しくお願いいたします。
","は、セルの区切りを表しているつもりです。
お礼
回答ありがとうございます。 No1さんの回答の内容をマクロ(VBA)で簡単に記述できませんか?という質問だったのですが・・・TT 質問の説明で言葉が足りなかったですね。。。。 orz.... すいません ちなみに、No1さんのやり方だとマクロでやる際は、ソートしたあと、A社・B社の判断を何でするかが問題になってしまい、これだと一個一個のセルを見て判断?これだと自分が書いたものと一緒です>< ですので、色々自分でも模索したところ、オートフィルタで抽出したいものを抽出して、抽出部分を別シートにペーストするだけで良いことに気づき解決しました。 ありがとうございました。