エクセル(2003・2007)でデータ抽出し、別シートを作成するための

質問

エクセル(2003・2007)でデータ抽出し、別シートを作成するための関数を教えて下さい

●シート名：サンプルＡ　　　　　　　　　　　　　　　　●シート名：サンプルＢ

　　Ａ　　Ｂ　　　 Ｃ　　 Ｄ　　Ｅ・・　　　　　　　　Ａ　　Ｂ　　　　　Ｃ
　　名前　日付1　 日付2　 備考　　　　　　名前　日付１　　　備考
１　山田　2010/10/15 2010/10/10 ああ　　　　１　鈴木　2010/10/18　うう
２　佐藤　　　　　　　　　　　　　いい　　　　　　　２　太田　2010/10/21　かか　
３　鈴木　2010/10/18 うう　　　　　→
４　井上　2010/11/20 ええ
５　石田　2010/8/7 2010/10/7 おお
６　太田　2010/10/21 かか

具体的に上記のデータから【Ｂ列が本日から10日間以内かつＣ列がスペース】のデータのＡ・Ｂ・Ｄ行を別シートに作成する関数を教えて下さい

よろしくお願いします
※なぜか文字がずれてしまってて、すいません・・・

回答No.2

KURUMITO · ベストアンサー

回答Ｎｏ1です。
サンプルＢでＢ列の日付が数値で表示されるのは日付はシリアル値で評価されその値が表示されるのです。Ｂ列を選択して右クリックし、「セルの書式設定」から「表示形式」のタブで「日付」の中から選択すればよいでしょう。
ところで実はもう3項目を増やしたいとのこと、初めからそのようにご質問されるようにしましょう。
3項目増やした状態での式は次のように変わります。
サンプルＡのシートではＨ2セルに次の式を入力して下方にオートフィルドラッグします。

=IF(B2="","",IF(AND(B2>=TODAY(),B2<TODAY()+10,C2=""),MAX(H$1:H1)+1,""))

サンプルＢシートではＡ2セルに次の式を入力し右横方向にオートフィルドラッグしたのちに下方向にもオートフィルドラッグします。

=IF(OR(ROW(A1)>MAX(サンプルＡ!$H:$H),COLUMN(A1)>6),"",IF(COLUMN(A1)<=2,INDEX(サンプルＡ!$A:$B,MATCH(ROW(A1),サンプルＡ!$H:$H,0),COLUMN(A1)),IF(COLUMN(A1)>=3,INDEX(サンプルＡ!$A:$G,MATCH(ROW(A1),サンプルＡ!$H:$H,0),COLUMN(A1)+1))))

お礼

2度も回答頂き、ありがとうございました

おかげさまで無事、作業完了しました！

回答No.1

KURUMITO

サンプルＡのシートではＡ1セルに氏名、Ａ2セルから下方にデータが、Ｂ，Ｃ、Ｄ列についても１行目に項目名が2行目以降にそれぞれのデータがあるとします。
作業列をＥ列に作ってＥ2セルには次の式を入力して下方にオートフィルドラッグします。

=IF(B2="","",IF(AND(B2>=TODAY(),B2<TODAY()+10,C2=""),MAX(E$1:E1)+1,""))

サンプルＢシートではＡ，Ｂ,Ｃ列の1行目に項目名があるとしてＡ2セルには次の式を入力してＣ2セルまでオートフィルドラッグしたのちに下方にもオートフィルドラッグします。

=IF(ROW(A1)>MAX(サンプルＡ!$E:$E),"",IF(COLUMN(A1)<=2,INDEX(サンプルＡ!$A:$B,MATCH(ROW(A1),サンプルＡ!$E:$E,0),COLUMN(A1)),IF(COLUMN(A1)=3,INDEX(サンプルＡ!$D:$D,MATCH(ROW(A1),サンプルＡ!$E:$E,0)),"")))

補足

ご回答有難うございます

氏名と備考はコピペでうまく出来ました
有難うございます

ただ、サンプルＢの日付表示がうまく表示されないのです
（40466等の数字が表示されます）

また、サンプルＡの後ろのほうの列からあと3項目程度サンプルＢに表示したいのですが、
関数も結構変わっちゃいますか？

素人ですいません