エクセル マクロ ２つのブックの情報からデータを抜き出したい

質問

エクセル　マクロ　２つのブックの情報からデータを抜き出したい
初めて質問させていただきます。明日までに仕上げなければいけない仕事で大変困っています。
作業内容としてはＡのブックには電話番号、Ｂのブックには電話番号と住所などその他の情報があります。
Ａのブックにある電話番号のみからＢのブックからデータを探し、
Ｂのブック横列にある電話番号を含むその他のデータをコピーして別ブックに抽出したいと
考えています。
Ａのブックには電話番号が１６００件、Ｂのブックには１６００件の電話番号を含んだデータで
２０万件ほどのデータがあります。シートは７つにわかれています。
利用しているオフィスのバージョンは２００３になります。
ＶＢＡなどの知識がほとんど無く、正直困り果てています。
よろしくお願いいたします。

回答No.2

keithin · ベストアンサー

急いでいるのなら，自分では出来ないマクロなんかで時間を無駄にしてる間に，ご自分の手をちゃっちゃと動かして出来ることでやった方が早く結果を出せます。

手順：
リストの１枚目のシートを開く（添付図左）
横に電話一覧のシートも開いておく（添付図右）
（ウィンドウメニューの「整列」を使うこと）

ここで，双方のシートの電話列の一番上のセルに「必ず同じ記載内容で」
電話番号
と記入しておく。
右のシートのA1をコピーし，左のB1セルに上書きで貼り付けるのが一番正解です。

左のシートでデータメニューのフィルタから「フィルタオプションの設定」を開始する
　抽出先は　選択範囲内
　リスト範囲　A1:C6などリストの全体範囲
　検索条件範囲　[book2.xls]Sheet1!$A$1:$A$4　などのように右のデータ範囲を設定する。
　　　　　　　　手抜きして列:列指定すると間違えるので，必ずデータのある範囲を指定すること

でOKすると，そのシートにあるリストに記載のある電話の行がその場で抽出されるので，普通に選んでコピーして集めるシートに貼り付ける。
次のシートでも同じ手順で同じ電話の行を絞り込み，そのままコピーして集めシートの続きに貼り付ける。
以下同文で７回手を動かせば，完成です。

お礼

上記の方法で無事に作業を終えることができました。正直徹夜も覚悟していただけに大変助かりました。
ありがとうございます！

回答No.3

haichicchi

VBAに慣れている人なら30分くらいで作れますが、
VBAの知識がほとんど無いのでしたら、ここで教えたところで
エラー時の対応などができないから使えないでしょうね。

明日までだったら手作業でやった方が早いです。
今後も同じような作業がありそうだったら、VBAを勉強しておくと
いいですよ。

回答No.1

hana-hana3

はっきり言って、アクセスに読み込ませて抽出するのがもっともベストで簡単かと思います。
もしくは、ＶｌＯＯＫＵＰを使って抽出したデータを結合させる。
または、作業列を使って電話番号の一致不一致をチェックして、オートフィルタで抽出してコピー。

お礼

回答ありがとうございます。今回は別の方法で解決しましたが次回からはアクセスなども使ってみようと思います。助かりました。