エクセルで月ごとの複数データを別シートに抽出したい

質問

エクセル2007で、sheet1に元となるデータがあり、その中からsheet2に月毎に列でまとめて、しかも日付順に並ばせたいと思っています。

まず、下記がsheet1のデータ例です。
--------------------------------------------
[sheet1]
　　　A列　　　　　B列　　　　　　　　　　C列　　　　　　D列
1　　名前　　　　　レンタル希望　　　　血液型　　　　担当
2　　山田太郎　　2013/9/12　　　　　A型　　　　　　営業　
3　　鈴木花子　　2013/8/1　　　　　　B型　　　　　　開発
4　　山下健　　　　2013/9/10　　　　　　O型　　　　　広報
--------------------------------------------
上記のような、随時追加・修正されていくデータです。

それを、下記のようにsheet2にB列（レンタル希望日）の月で検索し、B列の日付順でA列（名前）とB列（レンタル希望日）を随時表示させていきたいです。
--------------------------------------------
[sheet2]
　　　A列　　　　　　B列　　　　　　　　　C列　　　　　　D列
1　　8月レンタル　　　　　　　　　　　　9月レンタル
2　　名前　　　　　　レンタル希望　　　名前　　　　　レンタル希望
3　　鈴木花子　　　2013/8/1　　　　　山下健　　　　2013/9/10
4　　　　　　　　　　　　　　　　　　　　　山田太郎　　　2013/9/12
--------------------------------------------

このような形でsheet1を変えたものをレンタル希望日を基点にとして
随時並ばれていて、この月はこのぐらいの希望がこの人からあるのか（あったのか）
というのがわかるような管理表を作りたいと思っています。

フィルタオプション等をいろいろ試してみましたがうまくいかず、
また、なかなかマッチするQAが見つからず困っています。。。

どうかよろしくお願いします！

回答No.5

tom04

こんばんは！
極端にデータ量が多い場合はおススメしませんが・・・

↓の画像で説明します。
上側がSheet1、下側がSheet2とします。

Sheet2のA1セル（B1セルと結合しています）とC1セル（D1セルと結合）の表示形式に手を加えます。
A1～C1セルを範囲指定　→　右クリック　→　セルの書式設定　→　表示形式タブ　→　ユーザー定義
→　G/標準　と表示されているところを消して
0月レンタル
と入力し、OK
そしてA1・C1セルには単に月の数値のみを入力します。

次にSheet2のA3セルに
=IFERROR(INDEX(Sheet1!A$2:A$1000,MATCH(SMALL(IF(MONTH(Sheet1!$B$2:$B$1000)=$A$1,Sheet1!$B$2:$B$1000),ROW(A1)),Sheet1!$B$2:$B$1000,0)),"")

これは配列数式になりますので、Shift＋Ctrl＋Enterで確定！
この画面からコピー＆ペーストする場合はA3セルを選択　→　数式バー内に貼り付け　
→　そのまま（編集可能のまま）Shift＋Ctrlキーを押しながらEnterキーで確定！
数式の前後に｛　｝マークが入り配列数式になります。
これを隣のB3セルまでオートフィルでコピー！

C3セルには
=IFERROR(INDEX(Sheet1!A$2:A$1000,MATCH(SMALL(IF(MONTH(Sheet1!$B$2:$B$1000)=$C$1,Sheet1!$B$2:$B$1000),ROW(A1)),Sheet1!$B$2:$B$1000,0)),"")
（これも配列数式です）
として隣のD3セルまでコピー！

B3・D3セルの表示形式を「日付」にして
最後にA3～D3セルを範囲指定　→　D3セルのフィルハンドルで下へコピー！
これで画像のような感じになります。

※　同一日がある場合は最初の行が重複して表示されると思います。m(_ _)m