エクセル 検索したデータを１行抽出するには

質問

よろしくお願いします。

シート１には

氏名　　　　　　　生年月日　　　コード　　　　コード　　　コード 　　　交付番号
安心太郎　　　　S20.12.20　　　　１　　　　　　２　　　　　　３　　　　　1234567890
安全花子　　　　S40.11.11　　　　１　　　　　　　　　　　　　　　　　　　2345678901
道路一郎　　　　S30.10.25　　　　２　　　　　　３　　　　　　　　　　　　3456789012
橋川理恵　　　　S25.12.17　　　　３　　　　　　　　　　　　　　　　　　　4567890123
天気良太　　　　S50.11.28　　　　１　　　　　　３　　　　　　　　　　　　5678901234

という具合に、社員一覧表があるとします。

そして、シート２には

コード番号　　　　　名前
　　１　　　　　　　普通自動車免許
　　２　　　　　　　原動機付自転車免許
　　３　　　　　　　大型自動車免許

というようにコード一覧表があるとします。

ここからなのですが、

シート３には「１．普通自動車免許取得者一覧」
シート４には「２．原動機付自転車免許取得者一覧」
シート５には「３．大型自動車免許取得者一覧」

というように、シート１にデータ入力をしたら、
自動的に、コード別に検索して、該当するコードに引っかかる者は、それぞれのコード別シート（シート３～５）に、該当者のデータ１行分（氏名・生年月日・コード・交付番号等）が丸々コピー（転記）されるにはどうしたらよろしいのでしょうか。

関数等を調べましたが、該当するものが見あたらず、
やはり、マクロで行う方法なのかと思ったのですが、
マクロが超初心者のため、やり方や命令文(?)などが全くわからず、困っております。

よろしくおねがいいたします。

回答No.4

fumufumu_2006 · ベストアンサー

ANo.3です。

>「持っている免許が１になる」ということは、
>やはり、ANo.1さんの上のデータのように、「コード」ではなく、「コード名」で「再度表を作り直す」か、または「別の表を作らないといけない（ダミー表）」ということでしょうか。
>シート１の表は形を崩したくありません。
>ということは、「ダミー表を作らないといけない」ということでしょうか。

回答に書いた通りにやってみてもらえれば、どうなるかわかると思いますが・・・
やってみてもらえないんでしょうか？

また、sheet1に手を加えない場合です。
まず、sheet2に、Sheet1のA1:F1（みだし）をコピーします。
sheet2の
A2:=IF(ISNA(MATCH(1,Sheet1!C2:E2,0)),"",Sheet1!A2)
これを人数分下へコピーしてください。
B2:=IF($A2="","",IF(Sheet1!B2="","",Sheet1!B2))
これをB:F列で人数分下へコピーしてください。
sheet3の
A2:=IF(ISNA(MATCH(2,Sheet1!C2:E2,0)),"",Sheet1!A2)
これを人数分下へコピーしてください。
B2:=IF($A2="","",IF(Sheet1!B2="","",Sheet1!B2))
これをB:F列で人数分下へコピーしてください。
sheet4の
A2:=IF(ISNA(MATCH(3,Sheet1!C2:E2,0)),"",Sheet1!A2)
これを人数分下へコピーしてください。
B2:=IF($A2="","",IF(Sheet1!B2="","",Sheet1!B2))
これをB:F列で人数分下へコピーしてください。

これは、各シートのA2のMATCH(?,Sheet1!C2:E2,0)の？の部分の値がsheet1のC2:E2の間にあるかないかで表示するかしないかが決まります。
B2:F2は、A2に表示がある場合に表示します。
これを下方向にコピーします。

どんな表示になるかは、やってもらえればわかると思います。

お礼

再度の回答、本当にありがとうございます。

その後、フィルタオプションの設定をマクロ化させる方法を教わり、行ったところ、
希望通りにスムーズに抽出処理をすることができました。

ここまで丁寧に解説までしていただき、ありがとうございます。
今回fumufumu_2006さんに教えていただいた方法は、習得し、使えるようになっていきたいと思います。
本当にありがとうございました。

回答No.3

fumufumu_2006

ANo.2です。
「集計」じゃなかったです。

ANo.2をすると、ANo.1さんの上のデータのような状態になります。（持ってる免許が1になる）
それにオートフィルタをかけるのはどうでしょう？

または、sheet2,sheet3,・・・の
A1=IF(Sheet1!A1="","",Sheet1!A1)
として、必要な範囲にコピーすると、各sheetがsheet1と同じ表示がされます。
それにオートフィルタをかけるのはどうでしょう？

お礼

再度回答していただき、本当にありがとうございます。

「持っている免許が１になる」ということは、
やはり、ANo.1さんの上のデータのように、「コード」ではなく、「コード名」で「再度表を作り直す」か、または「別の表を作らないといけない（ダミー表）」ということでしょうか。
シート１の表は形を崩したくありません。
ということは、「ダミー表を作らないといけない」ということでしょうか。

自分でも色々なサイトから勉強してみたり、検索してみたりして、良い方法を探したりしているうちに、
なんとも頭が混乱してきてしまいました。

本当にありがとうございました。

回答No.2

fumufumu_2006

A1:氏名 B1:生年月日 C1:コード D1:コード E1:コード F1:交付番号
で、A2からデータが入っていたとします。

G1:普通自動車免許
H1:原動機付自転車免許
I1:大型自動車免許
と見出しを付けます。（別になくてもいいけれど）
G2:=IF(ISNA(MATCH(1,C2:E2,0)),"",1)
H2:=IF(ISNA(MATCH(2,C2:E2,0)),"",1)
I2:=IF(ISNA(MATCH(3,C2:E2,0)),"",1)
として、G2:I2を、人数分下へコピーします。
これで、各免許のある人に１が付くので、それで集計する。

というのはどうでしょうか？

最大１０個なら、C:Lがコードで、N:Wが、各資格の有無になります。
N2:=IF(ISNA(MATCH(1,C2:L2,0)),"",1)
O2:=IF(ISNA(MATCH(2,C2:L2,0)),"",1)
・・・
W2:=IF(ISNA(MATCH(10,C2:L2,0)),"",1)

お礼

回答ありがとうございます。

何がしたいのかと申しますと、

１.　シート１にデータ入力をしたら、
２.　コード別に作成したシートに、
３.　該当する人のデータを丸々１行分（氏名・生年月日・コード・交付番号等）を抽出させたい

のです。
抽出した人数を集計したいわけではありません。

今、フィルタオプションの方法が浮かんだのですが、
検索するコードのセルが多いからでしょうか、うまく抽出されずに悩んでおります。

ありがとうございました。

回答No.1

hana-hana3

氏名　　　　　　　生年月日　　　原　付　　　　普　通　　　大　型 　　　交付番号
安心太郎　　　　S20.12.20　　　　１　　　　　　１　　　　　　１　　　　　1234567890
安全花子　　　　S40.11.11　　　　１　　　　　　　　　　　　　　　　　　　2345678901

のようなデータなら、オートフィルタで抽出してコピーすれば結果がでますが・・・。

氏名　　　　　　　生年月日　　　免許種別　　　交付番号
安心太郎　　　　S20.12.20　　　　３　　　　　1234567890
安全花子　　　　S40.11.11　　　　１　　　　　2345678901

上位免許であれば、下位の運転資格があるので、上記のようなデータの方が良いのでは？

お礼

早速の回答、ありがとうございます。
例として挙げたのは運転免許についてなのですが、
実は、全く違う資格免許についての一覧なのです。
なので、それぞれの免許に上位・下位などというものは存在しないんです。
そしてまた、コードも例として３つほど挙げたのですが、
実は１０以上もあるんです。
もっと詳しく説明すれば良かったですね、申し訳ありませんでした。

なにか、良い方法はありませんでしょうか。