エクセルで、セルの内容によってそのデータと付随するデータを別シートに振り分ける方法を教えてください。

添付画像のようなデータがあって、№5に　種別→野菜、品目→きゅうり、金額→120　と入力したら、「野菜」シートに同じ形式の表があって、これらのデータがコピーされる方法が知りたいです。

種別→果物の場合は、「果物」シートにコピーされるということです。

よろしくお願いいたします。

No.2 ベストアンサー 回答者： mike_g 回答日時： 2018/10/19 13:49

先ず、貴方の「添付画像のようなデータ」のブックに名前を付けて保存しておいて

ください。
１．シート「一覧」の範囲 A1:D1 を選択 ⇒ Ctrl+C ⇒ シート名「野菜」をツン
￣￣ ⇒ Shiftキーを抑えたままでシート名「果物」をツン (２つのシート「野菜」
￣￣「果物」が同時に選択状態)⇒ セル A1 を選択して Ctrl+V をパシーッ
２．シート２枚「野菜」「果物」が選択状態のままで、セル A2 に次式を入力し
￣￣て、右３列にオートフィル ⇒ 範囲 A2:D2 を下方にズズーッと(取り敢えず
￣￣10行くらいネ)オートフィル
￣￣ =IFERROR(INDEX(一覧!A:A,SMALL(IF(一覧!$B$1:$B$100=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,9),ROW($A$1:$A$100)),ROW($A1))),"")
３．シート名「一覧」をツン (→「野菜」「果物」の同時選択状態が解除され、
￣￣「一覧」だけがアクティブになる)
４．確認するために、次の２行を追加して、シート「野菜」、「果物」を確認する
￣￣(添付図下段のように変化していませんか？)
￣￣￣￣5_野菜_キュウリ_120
￣￣￣￣6_果物_ブドウ＿_123

この回答へのお礼

早速のご回答ありがとうございます！
返信遅くなってすみません。m(__)m

はじめはうまくいきませんでしたが、式をCtrl＋Shift＋Enterでやってみたらうまくいきました。

ありがとうございます。

お礼日時：2018/10/19 23:43

No.3 回答者： 銀鱗 回答日時： 2018/10/19 13:56

MATCH関数とINDEX関数の組み合わせかな。

B列に”野菜”と入力されたセルの位置をC列やD列を参照するINDEX関数に渡して値を読み取る。
幸いなことにA列に番号が振ってあるので、その番号を使って参照する範囲をずらすことができます。
MATCH関数とINDEX関数で検索する範囲をOFFSET関数で指定すると良いでしょう。

G2セル
　=IFERROR(INDEX(A:A,MATCH($F$1,B:B,0),),"")
G3セル
　=IFERROR(INDEX(OFFSET($A$1,G2+1,0,1000,1),MATCH($F$1,OFFSET($B$1,G2+1,0,1000,1),0),),"")
H2セル
　=IFERROR(INDEX(C:C,MATCH($G2,$A:$A,0),),"")
I2セル
　=IFERROR(INDEX(D:D,MATCH($G2,$A:$A,0),),"")
H3,I3セルはH2,I2セルを複製するだけです。
以後、4行目位以降は3行目のG3,H3,I3セルを複製すれば楽に拡張できます。

・・・
やっていることは面倒なだけで難しいことはやっていません。
まず、G2セルには基準になる数式を作ります。
ここに一番初めに見つかるデータの「No.」を表示させるのです。
以後、この値を使って各データを拾います。
G2セルには
　MATCH関数でB列に「野菜」（F1セルの値）が上から何番目にあるかを調べさせます。
　MATCH($F$1,B:B,0)
　（写真の例では”にんじん”が2行目に見つかるので”２”が返ります）
　INDEX関数にこの”２”を使いA列の上から”2”行目にある値を拾います。
　INDEX(A:A,MATCH($F$1,B:B,0),)
　（写真の例では”１”が返ってきます）
　値が見つからなかった場合を想定して、IFERROR関数を使い、値が見つからないエラーが返ってきたときに空白を代わりに表示させるようにします。
　（写真の例ではエラーにならないので”１”が表示されています）
同様にG3セルや他のセルも難しいことはしていません。

文章にすると小難しく見えますが、一つ一つの関数が何をしているのかを考えると実は面倒なだけで難しくはないことが分かると思います。


・・・
他のシートに表示させたいということですので、
写真のように作成したら、該当箇所を「切り取り」して対象のシートに「貼り付け」てください。
「野菜」の部分を「果物」に変えたシートが必要なら、この貼り付けた個所を今度は「コピー」して新しいシートに「貼り付け」てください。
その後に「野菜」を「果物」に書き換えるだけです。
もし「No.」の表示が不要ならば、「No.」の列を非表示にしてください。
この部分の数式を他の数式に組み込むこともできますが、凄く面倒なことになります。
（配列数式を使って処理をすることになるのでメンテナンスが凄く大変なことになるんです）

この回答へのお礼

早速のご回答ありがとうございます！
返信遅くなってすみません。m(__)m

仰る通り文章だと難しそうでしたが、出来ました。

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

お礼日時：2018/10/19 23:45

No.1 回答者： tom04 回答日時： 2018/10/19 13:40

こんにちは！

一例です。
↓の画像のように元データは「一覧」Sheetにあるとします。
各シートともやり方は同じです。
A1セルに「種別」名を入力しておきます。

画像ではA4セルに
=IFERROR(INDEX(一覧!A$1:A$1000,SMALL(IF(一覧!$B$1:$B$1000=$A$1,ROW(A$1:A$1000)),ROW(A1))),"")

配列数式なので、Ctrl＋Shift＋Enterで確定！（←必須★）し
フィルハンドルで列・行方向にコピーすると画像のような感じになります。

※　もちろん同じ操作を各シートで行っても構いませんが
この方法だと「種別」ごとのSheetは不要でA1セルの「種別」を入れ替えるだけで
結果が表示されます。
この場合はA1セルに入力規則のリスト設定をしておけば簡単に表示が変わります。m(_ _)m

この回答へのお礼

早速のご回答ありがとうございます！
返信遅くなってすみません。m(__)m

出来ました！

ありがとうございます。

お礼日時：2018/10/19 23:41