EXC日付別で複数行、列のデータを反映させる

質問

EXC2007です。
シート１がデータベース、シート２が反映先です。
データベースには年間のデータが入力されてます。
そのデータベースからシート２の特定のセルに月日を入力すると
その月日のデータ（複数行、列）を全て反映させるように
したいのですができますか？（一日のデータ約３０件）
ＶＬＯＯＫでやってみたのですが単列しか反映せず全て反映
しません。ＶＬＯＯＫとＨＬＯＯＫの併用はできるのでしょうか？
ＶＢＡでも結構です。どなたか宜しくお願いします。
＊データベース参考（シート１）
Ａ　　Ｂ　　　Ｃ　　Ｄ　　Ｅ　　Ｆ
月日　顧客名　品名　品番　金額　適用
　　　　　　　↓
　　　＊以下一年分データ
＊反映先参考（シート２）
Ａ　　Ｂ　　　Ｃ　　Ｄ　　Ｅ　　Ｆ
3/27←（入力すると以下反映）
　　　　　　　　↓
月日　顧客名　品名　品番　金額　適用
3/27　山本　　パン　1　　100　　Ａ
　　　　　　　　↓
　　　　　以下約３０件程度

回答No.2

n_na_tto · ベストアンサー

●Sheet1A列が昇順であれば...
G列に通しNo
＿＿＿A＿＿＿_B＿＿_C＿＿_D＿＿_E＿＿_F＿_G_
1＿月日＿顧客名＿品名＿品番＿金額＿適用＿No_
2＿3/26＿＿山本＿パン＿＿_1＿_100＿＿Ａ＿_1_
3＿3/26＿＿大田＿牛乳＿＿_5＿_120＿＿Ａ＿_2_
4＿3/26＿＿斉藤＿納豆＿＿_9＿＿90＿＿Ｂ＿_3_
5＿3/27＿＿鈴木＿パン＿＿_1＿_100＿＿Ａ＿_4_
6＿3/27＿＿大田＿牛乳＿＿_5＿_120＿＿Ａ＿_5_
7＿3/27＿＿斉藤＿納豆＿＿_9＿＿90＿＿Ｂ＿_6_
8＿3/27＿＿吉田＿味噌＿＿12＿_250＿＿Ａ＿_7_

●Sheet2
＿＿＿A＿＿＿_B＿＿_C＿＿_D＿＿_E＿＿_F＿_G_
1＿3/27＿＿件数＿＿_4＿＿＿＿＿＿＿＿＿＿＿_
2＿月日＿顧客名＿品名＿品番＿金額＿適用＿No_
3＿3/27＿＿鈴木＿パン＿＿_1＿_100＿＿Ａ＿_4_
4＿3/27＿＿大田＿牛乳＿＿_5＿_120＿＿Ａ＿_5_
5＿3/27＿＿斉藤＿納豆＿＿_9＿＿90＿＿Ｂ＿_6_
6＿3/27＿＿吉田＿味噌＿＿12＿_250＿＿Ａ＿_7_

・A1に日付入力

・C1に件数
C1
=COUNTIF(Sheet1!A:A,A1)

・G列にNo
G3
=IF(ROW(1:1)>$C$1,"",INDEX(Sheet1!$G:$G,MATCH($A$1,Sheet1!A:A,0)+ROW(1:1)-1))
下方向・↓

・他はＧ列参照
A3
=IF($G3="","",INDEX(Sheet1!A:A,$G3+1))
右方向・→下方向・↓

お礼

解決しました。
ありがとうございます。

回答No.3

mu2011

NO1です。
以下の関数を抽出セルに設定、縦横に必要分コピーして下さい。
尚、配列数式の為、入力完了時にshift＋ctrl＋enterキーを同時押下して下さい。
=IF(COUNTIF(Sheet1!$A:$A,$A$1)>ROW(A1)-1,INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$A$2:$A$10000=$A$1,ROW(Sheet1!$A$2:$A$10000),99999),ROW(A1))),"")
因みにＡ列はコピー後に表示形式を日付にして下さい。

回答No.1

mu2011

次の方法は如何でしょうか。
（１）sheet2のA1に「月日」の文字列、A2に日付入力
（２）フィルタオプションの設定→指定した範囲を選択、リスト範囲欄にsheet1!A:F、検索条件範囲欄にA1:A2、抽出範囲欄にA3→ＯＫ
因みに（２）をマクロ記録しておくと操作が簡単になりますが如何でしょうか。

参考URL：

http://www.eurus.dti.ne.jp/~yoneyama/Excel2007/excel2007-filter2.html

お礼

早速ご回答ありがとうございます。
シート２はデイリーの報告書（Ａ４プリント）も兼ねた
フォーマット（入力枠３０件程度）になっており、今は前日の
データ消去は手動で、当然入力も手動でみたいな感じなので
できれば日付入力で瞬時に更新反映（消去、入力共）されるよう
にしたいのですが・・。