(例データ)Sheet1のA1:C11に、
(明確でなく多分に想像してます)
(A列) (B列) (C列) (D列)
日付 項目1 項目2 ワーク列
2004/4/1 a x 1
2004/4/2 b y
2004/4/3 c z
2004/5/2 d u
2004/6/1 e v 2
2004/6/2 f s
2004/6/3 g t
2004/7/1 h w 3
2004/7/2 I q
2004/7/3 j e
D列は初めはなにも入ってません。
(関数式)
使わない列を1列ワークに使う。例えばD列として、D2に
=IF(DAY(A2)=1,COUNT($D$1:D1)+1, "")
といれ、下に複写する。上記D列のようになる。
(関数式)
Sheet2にいって
A2に=OFFSET(Sheet1!$A$2,MATCH(ROW(A2)-1,Sheet1!$D$1:$D$20,0)-2,0)
といれる。
B2に=OFFSET(Sheet1!$A$2,MATCH(ROW(B2)-1,Sheet1!$D$1:$D$20,0)-2,1)
C2に=OFFSET(Sheet1!$A$2,MATCH(ROW(C2)-1,Sheet1!$D$1:$D$20,0)-2,2)
を入れる。最後の引数だけが0->1->2と変っただけ。$D$20は適当に最下行予定を入れること。
A2;C2を範囲指定し、C2で+ハンドルを出して、下へ引っ張る。C4まで3件分引っ張る。
Sheet2で、前もって多数行に式を入れておくと#N/Aが出ますが、防止策はISERRORを使うことだが、式が長くなるので略。
(結果)
日付 項目1 項目2
2004/4/1 a x
2004/6/1 e v
2004/7/1 h w
となります。
A列は、書式を日付にしておくこと。
お礼
ありがとうございます。 いまから仕事で出かけまして、夜中までPCは開かないので時間がないので明日また試します。 ご丁寧にありがとうございます。