C列の要素によって、３枚のシートに振り分ける

シート１に顧客の名簿がずらっと一覧で入っているとします。
例えばA列…名前、B列…住所、C列…買った物（いちご、メロン、すいかの３種類）、D列…備考

　　A列　　　　　　B列　　　　　C列　　　　D列
　山田太郎　　　山梨県　　　いちご　　　新規さん（５月）
　鈴木良子　　　北海道　　　メロン　　　　 -
　田中浩史　　　東京都　　　すいか　　　常連さん
　高橋幸恵　　　京都府　　　すいか　　　　-
　本田一郎　　　長崎県　　　バナナ　　 　-
　…

というような一覧が数百人分入っているとします。

これをC列の要素によって、シート２～４に自動的に振り分けたいのです。
例えば「シート２」は「いちごを買った人一覧」に、「シート３」は「メロンを買った人一覧」にしたい、
それが、C列に「いちご」などと入力した瞬間に自動的にシート２に反映されるようにしたいです。
もちろんA列やB列、D列の要素をともなったまま。
また隙間を空けずにいちごを買った人が全部で52人なら52行でぴたりと収まるようにしたいです。

そのためにはシート２（もしくは３～４）のC列に、何らかの関数を入れればいいでしょうか？
またどんな関数を入れたらいいでしょうか。

よろしくお願い申し上げます。

No.3 回答者： passers-by 回答日時： 2015/01/23 15:18

セルの仕組みを考えるとわかると思いますが、関数では不可能もしくは現実的ではないでしょう。

ただし、マクロを使って実現することは可能だと思います。

この回答へのお礼

ありがとうございます。
マクロを使うとするとどのように記述すればいいでしょうか。

お礼日時：2015/01/23 15:38

No.2 回答者： Deathscythe#1 回答日時： 2015/01/23 15:18

イチゴを例に、とりあえずシート1は最大300行まで使用するとします

A1＝IF(B1="","",1)
A2＝IF(B2="","",COUNT(A$1:A1)+1） ※A3～A300はA2をコピー
B1=IF(Sheet1!B2="いちご",Shhe1!A1,"") ※B2以降はコレをコピー
C1=IF(B1="","",Sheet1!B1）※C2～C300はコレをコピー
D1=IF(B1="","",Sheet1!D1）※D2～D300はコレをコピー

で、E1からE300に通し番号を振る
その後A~E列は非表示に変更

F1=IFERROR(VLOOKUP(E1,$A$1:$D$300,2,FALSE),"")※F2~F300はコレをコピー
G1=IFERROR(VLOOKUP(E1,$A$1:$D$300,3,FALSE),"")※G2~G300はコレをコピー
H1=IFERROR(VLOOKUP(E1,$A$1:$D$300,4,FALSE),"")※H2~H300はコレをコピー


これでいちご専用のシート2にはいちご購入者がC列の買った物を除いた状態で並びます
しーと3,4はB1にいれた関数内の「いちご」をそれぞれの果物に変えればOKです

この回答へのお礼

ありがとうございます。

すみません、上の
>A1＝IF(B1="","",1)
>A2＝IF(B2="","",COUNT(A$1:A1)+1） ※A3～A300はA2をコピー
>B1=IF(Sheet1!B2="いちご",Shhe1!A1,"") ※B2以降はコレをコピー
>C1=IF(B1="","",Sheet1!B1）※C2～C300はコレをコピー
>D1=IF(B1="","",Sheet1!D1）※D2～D300はコレをコピー

はシート１に入れるのですか？それともシート２（３～４）に入れるのでしょうか。

また「E1からE300に通し番号を振る」のは、シート１の大元の一覧ですよね？

>F1=IFERROR(VLOOKUP(E1,$A$1:$D$300,2,FALSE),"")※F2~F300はコレをコピー
>G1=IFERROR(VLOOKUP(E1,$A$1:$D$300,3,FALSE),"")※G2~G300はコレをコピー
>H1=IFERROR(VLOOKUP(E1,$A$1:$D$300,4,FALSE),"")※H2~H300はコレをコピー

も、シート１に入れるのですか？それともシート２（３～４）に入れるのでしょうか。

重ねて申し訳ありません。
よろしければご教示願えましたら嬉しいです。

お礼日時：2015/01/23 15:35

No.1 回答者： chiune 回答日時： 2015/01/23 15:15

関数では無理だと思います。

マクロ使っても良いなら出来ると思いますけど。

この回答へのお礼

ありがとうございます。
マクロを使ってやるとすると、どのように記述すればいいでしょうか。

また、すみません、「買った物」は「最新の買った物」の間違いでした。
「いちご」だった人が「メロン」に変わることもあります。
そのときシート２からシート３に、自動的にデータが移動するのがいいのですが…。

お礼日時：2015/01/23 15:36