エクセルで別のシートに特定の項目を表示したいのですがどうすればいいでし

質問

エクセルで別のシートに特定の項目を表示したいのですがどうすればいいでしょうか。

お恥ずかしながらhttp://okwave.jp/qa/q5895928.htmlにて、似たような質問をいたしましたが、電光石火の如くご回答を頂きました。おかげさまでその時は寝不足でお肌をいじめることなく済んだのですが、新たな難問となりました。以前教えて頂いた式をこちゃこちゃしたり、切り貼りしたりましたが上手くいきません。
説明が上手くできないので画像にしてみました。（これぐらいなら何とか。。。）

まず、Sheet1の横(a～k)にデータがあり、それが縦に約2,100件あります。
Sheet1のデータを参照して、
(1)Sheet2にSheet1の区分「02占い師」のデータのうち特定の項目（お名前、所在地、電話番号、サービス内容）を表示し、
(2)Sheet3にSheet1の区分「都道府県」のデータのうち特定の項目（お名前、所在地、電話番号、サービス内容）を表示させることはできるでしょうか？
ただし、(1)、(2)とも列幅をゼロにしてセルを見えなくする方法を使わない方法はあるのでしょうか。

ぐぐってみましたが。。。aroma_de_uu的には不可能でした。

回答No.4

tom04 · ベストアンサー

No.3です！
たびたびごめんなさい。

前回の数式に少し間違いがありました。
Sheet2のA4セルは
=IF(COUNTIF(Sheet1!$A$2:$A$2500,$A$1)<ROW(A1),"",INDEX(Sheet1!D$2:D$2500,SMALL(IF(Sheet1!$A$2:$A$2500=$A$1,ROW($A$1:$A$2499)),ROW(A1))))
に訂正してください。

ついでと言っては失礼ですが、
Sheet3のA4セルの数式も載せておきます。
=IF(COUNTIF(Sheet1!$B$2:$B$2500,$A$1)<ROW(A1),"",INDEX(Sheet1!D$2:D$2500,SMALL(IF(Sheet1!$B$2:$B$2500=$A$1,ROW($A$1:$A2449)),ROW(A1))))

どちらも配列数式ですので、前回同様に
Shift＋Ctrlキーを押しながらEnterキーで確定です。

どうも何度も失礼しました。m(__)m

お礼

tom04さんありがとうございました。他にご回答下さった皆様もそうですが、どうしてこんな式を考えつくのでしょう。す・ご・す・ぎ・デ・ス。本当にありがとうございました。

回答No.3

tom04

こんにちは！
他の方の回答と重複すると思いますが、
途中に「〒」の列が入っていますので、希望通りにやろうとすると
単純に列方向にオートフィルでコピーは出来ないと思いますので、
数式を二つ作る必要があります。

それよりも他の方が仰っているようにとりあえず不必要なデータも表示させて、必要ない列を「非表示」にした方が簡単だと思います。

↓の画像でとりあえずSheet2の表だけ作ってみました。
Sheet1の最初の3列は必要ないようなので、数式の範囲指定を「お名前」のD列から行います。

Sheet2のA4セルに
=IF(COUNTIF(Sheet1!$A$2:$A2500,$A$1)<ROW(A1),"",INDEX(Sheet1!D$2:D$2500,SMALL(IF(Sheet1!$A$2:$A2500=$A$1,ROW($A$1:$A$2449)),ROW(A1))))

これは前回同様に配列数式になってしまいますので、
この画面からSheet2のA4セルに貼り付け後、F2キーを押す、又はA4セルでダブルクリック、又は数式バー内で一度クリックしてみてください。
編集可能になりますので、Shift＋Ctrlキーを押しながらEnterキーで確定します。
配列数式になりますので、これを列方向と行方向にオートフィルでコピーすると
画像のようになります。

そして、B列が不必要になりますので、
B列全てを範囲指定（列番号の「B」のところでクリック）　→　右クリック　「表示しない」を選択してはどうでしょうか？

以上、長々と書きましたが
参考になれば幸いです。m(__)m

お礼

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

回答No.2

keithin

職種：
随意のセルに
=INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$A$1:$A$2500=$A$1,ROW(Sheet1!$A$1:$A$2500),9999),ROW(A1)))&""
を記入してコントロールキーとシフトキーを押しながらEnterで入力する。

下にコピー，右にコピーし，その後不要な列を削除して左に詰める。

住所：
随意のセルに
=INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$B$1:$B$2500=$A$1,ROW(Sheet1!$B$1:$B$2500),9999),ROW(A1)))&""
を記入してコントロールキーとシフトキーを押しながらEnterで入力する。

下にコピー，右にコピーし，その後不要な列を削除して左に詰める。

お礼

keithinさん、またも丁寧に回答くださいましてありがとうございます。A列を削除しないように教えていただいた式を使わせていただきます。余談ですが、この式を入れてシートをこちゃこちゃしていると、シート数が全部で３５シート、重さも2500キロバイト？（←この表現は正しくないかも）になりました。
元のシートを１行削除したら、「ただいま考え中」が長く続きます。これはしかたないですよね。いずれにせよありがとうございました。

回答No.1

MackyNo1

以前の質問と全く同じように思いますが、具体的にどの部分がわからないのでしょうか？

最も簡単な対応は、ひとまずすべての列を右方向にオートフィルしすべてのデータを表示しておき、必要な列のデータだけを表示したいセルに移動し、他の列は削除します。

ちなみに数式セルを、そのまま移動するには以下のような操作をします。

移動したい数式セルを選択してセルの周囲にカーソルを合わせ、移動先のセルにドラッグアンドドロップします。

お礼

MackyNo1さんありがとうございました。必要な列を残して削除するとどうしてもうまくひょうじされなかたんです。ようやくわかったのですがA列を削除したのがいけなかったのかもしれません。
いずれにせよ親切にご回答管さましてありがとうございました。