エクセル2002での関数処理の仕方について

質問

エクセル2002関数について教えてください。
例えば、A1～それぞれのセルに

あA1
いA2
うA3
えA4
あA5
うA6
あA7
・
・

と2000個ぐらのセルにいろんな文字が入っているとします。
上では、「あ」が3個と「う」2個が重なっています。
2個以上重なっている文字、ここでいうと「あ」と「い」を他のセルに抜き出したいのです。
つまり、重なっているもののリストを作りたいのですが。よろしくおねがいします。

回答No.1

yuuko_mama · ベストアンサー

B1セルに次の計算式を設定します。
＝if(countif($A$1:$A$2000,A1)>1,A1,"")
B2以降のセルにB1のセルをコピーします。
すると、2個以上重なった文字は、Ｂ列に文字が表示されます。
どうでしょうか？

お礼

ありがとうございます。
COUNTIFを使うのはうすうす分かっていたのですが、
意外と簡単だったので少し面食らっています。
柔軟さが必要ですね。
本当にありがとうございます。

回答No.5

imogasi

＃４です。
（２）２度以上出現する文字のセルは、「１度だけ」例えば別行に抜き出す方法。
Ａ列にデータがあるとして、Ｂ２に
=IF(COUNTIF($A$1:A2,A2)=2,A2,"")といれ、Ｂ３より下へ複写します。あとＢ列だけをソートすれば良い。
２回目の出現だけを捉えて、同行別列へコピーしています。

回答No.4

imogasi

＞重なっているもののリストを作りたいのですが
（１）２度以上出現する文字のセルは、例えば別行に「何度でも」抜き出すのか
（２）２度以上出現する文字のセルは、「１度だけ」例えば別行に抜き出すのか
曖昧です。
多分（２）ではないかと思いますが。
＃１のご回答などは、（１）対応？。

回答No.3

Mozisan

集計とオートフィルタを組み合わせた方法を考えてみました。

１．シートをコピーします（元データを残すため）
２．「集計」を使うための準備です。
　a.1行目に行挿入し、項目名を入れます。
　　　例えば、Ａ１は「項目」Ｂ１は「価格」
　b.Ｂ２に数値を入れます。「０」で良いです。
　c.Ｂ２をコピーしてＡ列のデータ数と同じだけＢ列に貼り付けます。
　d.Ａ列をキーにしてソートします。
３．メニューバー「データ」－「集計」をクリックします。「集計の設定」窓はそのまま「ＯＫ」で良いと思います。
４．すると、「あ 計」といった集計行が追加され、グループ化されます。
５．Ｃ列の「あ 計」(アドレスC3)に「=IF(A2=A1,"重複","")と式を入れます。この式をＣ列全体にコピーします。（式のアドレスに注意してくださいＣ３セルであれば、Ａ２とＡ１を比較します）。
　　つまり、「計」が表示されている行の項目名が重複しているものだけ「重複」が表示されます。
６．Ｃ１にも項目名を入れます「重複チェック」とでも入れてください。
７．メニューバー「データ」－「フィルタ」－「オートフィルタ」をクリックします。
８．1行目の各セルの右側に▼のボタンが表示されます。
９．Ｃ１の▼をクリックし、「重複」を選びます。
10．「あ 計」など重複データのリストができます。
11．Ａ列の「○○　計」を選択し、コピー、別シートに貼り付けます。
12．貼り付けた列を選び、メニューバー「編集」－「置換」をクリックします。
13．「検索する文字列」に「_計」と入れます（_は半角の空白を入れてください）。「置換後の文字列」は何も入れません。
14．「すべて置換」ボタンをクリックします。
15．「太字」書式を解除すれば、重複している項目だけのリストが完成します。

ちょっと面倒な方法ですが、パズル感覚で考えてみました。他に、もっと簡単な方法もあるかもしれません。

回答No.2

arukamun

こんにちは

Ａ列しかデータがないようですので、取りあえずソートしましょう。
[データ]→[並べ替え]
で、列Ａが昇順で良いと思いますので、[ＯＫ]します。
次に、A1を選択した状態で、[挿入]→[行]をします。
行が挿入されますので、A1セルにデータ、B1セルにチェックとでもしましょう。

次に、B3セルに

=IF(AND(A1<>"",A1=A2),"重複","")

を書くかこのまま上記をコピーしてペーストします。
B3セルを選択した状態で、Ctrl + Cを押し、コピーします。
B4セルに移動して、Ctrl + Shift + ↓を押します。
B4セルから、B65536まで選択されますので、Ctrl + Vを押し、ペーストします。

B列に重複とかかれているところが、欲しいリストになります。

[データ]→[フィルタ]→[オートフィルタ]を実行します。
A1のデータと、B1のチェックに▼がつきます。
チェックの▼を押して、重複を選択します。

これで、A列の重複したものだけが、リストアップされます。

A列のAボタンを押して、Ctrl + Cでコピーします。
別のシートを選択して、Ctrl + Vでペーストすれば、重複したリストだけをペースト出来ます。

ご確認ください。