エクセル教えて下さい

質問

以下の様なデータで、

＿＿Ａ＿＿Ｂ＿＿Ｃ
1＿10＿＿12＿＿●
2＿12＿＿14＿＿△
3＿18＿＿18＿＿◎
4＿22＿＿31＿＿□
5＿31＿＿33＿＿●

A列にある数字とB列にある数字が一致する行だけを別シートに抽出したい場合、
どのような方法がありますか？

回答No.3

imogasi

(テストデータ）Ａ２：Ｃ１２（第１行目は見出し用にあけています）
9 10 a
12 12 b
3 4 c
13 4 d
4 4 e
23 24 f
1 2 g
3 3 h
4 3 I
6 6 j
7 5 k
(関数式）
Ｄ２に=IF(A2=B2,1,"")
Ｄ３に=IF(A3=B3,COUNT($D$2:D2)+1,"")
＄はこの通り正確に入れてください。
Ｄ４からＤ１２までＤ３を複写する。
（Ｄ列結果の値）
Ｄ３＝１、Ｄ６＝２、Ｄ９＝３、Ｄ１１＝４となります。
Ａ列＝Ｂ列の行が４行ありますと言うこと。
（関数式）
Ｅ２に=OFFSET($A$2,MATCH(ROW()-1,$D$2:$D$12,0)-1,2)
Ｅ３以下Ｅ５まで複写する。５＝４（４はＤ１１の値。Ｄ列の最大値）＋１（＋１は第２行目から始めたため。）
（結果）
Ｅ１＝b、Ｅ２＝e、Ｅ３＝h、Ｅ４＝jとなります。
●やっていることは自分の行番号－１（第２行目からはじめるため－１となる）と同じ数字がＤ列に入っている行を探し、その行のＡ列から右３列目（オフセットでは２）のセルの値を取ってきています。
普通は関数式では条件に合ったものを、上行から積めてセットして行く抜き出しは出来ません。本解答は、送る側からでなくて、受ける側で、その行に来るべき行を探しています。その点技巧的です。今まで市販本での解答には載っていないのではと思います？
ＶＢＡでやればなんなく出来るのですが。

回答No.2

maruru01

つまり、質問の例だと、1、3、4行目を書き出すわけですね。
じゃあこれ。
Sheet2のA1に、

=IF(SUMPRODUCT(ISNUMBER(MATCH(Sheet1!$B$1:$B$5,Sheet1!$A$1:$A$5,0))*1)>=ROW(1:1),INDEX(Sheet1!B:B,SMALL(IF(ISNUMBER(MATCH(Sheet1!$B$1:$B$5,Sheet1!$A$1:$A$5,0)),ROW(Sheet1!$B$1:$B$5)),ROW(1:1))),"")

と入力して、[Ctrl]＋[Shift]＋[Enter]で配列数式にします。
そして、右へ必要な列数分コピーし、さらに下の行へコピーします。

回答No.1

maruru01

こんにちは。maruru01です。

元のデータがSheet1にあるとして、Sheet2に抽出するとします。
Sheet2のA1に、

=IF(SUMPRODUCT((Sheet1!$A$1:$A$5=Sheet1!$B$1:$B$5)*1)>=ROW(1:1),INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$A$1:$A$5=Sheet1!$B$1:$B$5,ROW(Sheet1!$A$1:$A$5)),ROW(1:1))),"")

と入力して、[Ctrl]＋[Shift]＋[Enter]で決定します。
（数式の両端に「{}」が付いて、配列数式になります。）
そしたら、これをC1までコピー、さらに下の行へコピーします。
下の行へのコピーは元のデータ数分で十分です。

補足

さっそく回答ありがとうございます。
質問を読み返すと、伝えたい事が伝わらない書き方だったので補足します。すみません。

やりたい事というのが、B列の中に含まれる、A列と一致する数字の行だけを抜取りたいというものです。
つまりB列には余分な数字があり、データ個数的にもB列の方が多いです。
B列にある数字がA列にもあるという行だけをB列以降、行ごと別シートに抜きとりたいのです。

おそれいりますがよろしくお願いします。