A16 A9の解決方法

質問者が納得たとえば♪A1,♪A6・・・フィル後♪を=に置き換えとか

質問者が納得やっぱりマクロになります＾＾Sub try3()Dim i As Long, n As Longn = 0n = Range("a1").End(xlDown).RowFor i = n To 1 Step -1 Rows(i + 1).Resize(3).Insert shift:=xlShiftDown Cells(i, 1).Copy Cells(i, 1).Resize(3).Offset(1)NextEnd Sub上記を標準モジュールにコピペします。Alt+F11 & ...

質問者が納得関数を使わないでも良いなら、本命の方だけ回答します。まず、1行目に新しい行を追加します。そして、A1とB1にタイトルを付けます。何でも良いので、とりあえずA1には「AA」、B1には「BB」とでもしておきましょう。エクセル2007をご使用のようなので、次からは、下記のサイトをご覧になって、操作してみて下さい。↓重複データの削除http://www.eurus.dti.ne.jp/~yoneyama/Excel2007/excel2007-filter2.html#jyufukunosakujyoB列については...

質問者が納得A1に、=IF(C1="","",INDIRECT("C"&CEILING(ROW()/8,1)*8))これを下へオートフィルして下さい。C列が未入力なら、A列にも日付が表示されないようにしました。

質問者が納得データがSheet1に入力されているとして、別のシートのセルに↓を入力して、他のセルにコピー＆ペーストでいかがでしょうか？=AVERAGE(INDEX(Sheet1!A:A,8*(ROW(A1)-1)+1):INDEX(Sheet1!A:A,8*ROW(A1)))

質問者が納得作業列が必要になります。例えばE9セルに=IF(A1>0,ROW(A1),"")を入力E16セルまでコピーA9セルに=IF(COUNTA($A$1:$A$8)<ROW(A1),"",INDIRECT("A"&SMALL($E$9:$E$16,ROW(A1))))を入力A16セルまでコピー

質問者が納得常のその行含め上方向に5つの合計ですね。作業列C列を使います。B1：=IF(C1<6,SUM($A$1:A1),SUM(INDIRECT("A"&MATCH(C1-4,C:C,0)&":A"&ROW()))) C1：=COUNT($A$1:A1)このB1C1を下方向にオートフィル式の説明は省略します。・・・