特殊な連続数を簡単に入力するには？

質問

任意のセルから縦(横)方向に
1、2、3、4、…
の連続数を入力する方法は、私でも承知しておりますが、
1、2、2、3、3、3、4、4、4、4、…、9、9、9、9、9、9、9、9、9、…
のように、2 を２回、3 を３回、4 を４回、… それぞれ繰り返すように入力する(マクロ以外の)方法があれば教えてください。

ちなみに、私が使用する Excel のバージョンは、2002、2013 です。

回答No.5

keithin · ベストアンサー

＞2 を２回、3 を３回、4 を４回、… それぞれ繰り返す

その通りにやってみると

任意のセル，仮にB3に初期値を記入
右隣のセルに
=B3+(COUNTIF($B3:B3,B3)=B3)
右にコピー。

お礼

此れもお見事！しかも、式が最短！
ありがとうございました。

回答No.4

1380649874335

ごめんなさい。セル番号間違えてました。
修正します。

１）A1に「１」を入力。

２）B1に以下を入力
　「=IF(COUNTIF($A$1:A1,A1)>=A1, A1+1, A1)」

３）B1セルを選択して、いつも連番するみたいに右にコピー。
　　(セル右下にマウスを持っていくと黒い十字架が出るやつ)

回答No.3

keithin

等差級数の和の逆数で求めてみると

初期値が１固定の場合
任意のセルに
=ROUNDUP(SQRT(0.25+2*COLUMN(A1))-0.5,0)
右にコピー。

補足

》 等差級数の和の逆数で求めてみると…
噛み砕いて解説していただけないでしょうか？
しかし、こちらもお見事ですね！
ありがとうございました。

回答No.2

1380649874335

１）A1に「１」を入力。

２）A2に以下を入力
　「=IF(COUNTIF($A$1:A1,A1)>=A1, A1+1, A1)」

３）A2セルを選択して、いつも連番するみたいに右にコピー。
　　(セル右下にマウスを持っていくと黒い十字架が出るやつ)

【解説】

１）COUNTIF関数で、
　自セルの左側のセル全てを対象に検索し、
　自セル左側の数値が何個あるか得る。

2)得た個数と、自セル左側の数値を比較。

　　・以上ならば、左側の数値＋１を設定

　　・小さい場合は左側の数値を設定

※A1のセルのを「0」や「2」から始めても大丈夫です。
※COUNTIF関数の検索対象の先頭は絶対参照です。
　(「$A$1」の部分)

お礼

嗚呼！
平易な式で、お見事！
ありがとうございました。

回答No.1

f272

A1=1,A2=2,A3=3,A4=4,...として
B1=CEILING((SQRT(A1*8+1)-1)/2,1)
でB列を下にコピー

お礼

嗚呼！
任意のセルから下になら、=CEILING((SQRT(ROW(A1)*8+1)-1)/2,1)
任意のセルから右になら、=CEILING((SQRT(COLUMN(A1)*8+1)-1)/2,1)
とすれば好いのですね。使わせていただきます。
即効回答を、ありがとうございました！