空白セルから連番をつける

質問

エクセル２０００を使用しています。

１．B4に以下の式を入力し、C列に文字入力するとB列に連番がふるようにしています。
　　　　=IF(C4="","",ROW()-3)

２．B53までこの式をオートフィルし、50行の連番としています。
　　　　=IF(C4="","",ROW()-3)
　　　　=IF(C5="","",ROW()-3)
　　　　=IF(C6="","",ROW()-3)
　　　　　　　　　　・
　　　　　　　　　　・
　　　　　　　　　　・
　　　　=IF(C53="","",ROW()-3)

３．B54は区切りのため空白となっています。

４．B55から再び連番を付けるため以下の式を入力しています。
　　　　=IF(B55="","",ROW()-54)

ここからが質問ですが、４項の式をB4～B53からコピーペーストすると、
　　　　=IF(B55="","",ROW()-3)
となるため、末尾の3を54に手入力により変更する必要が発生してしまいます。
コピーペースト後、式変更の必要ない関数は作れるでしょうか？

連続する場合はオートフィルを使いたいのでそこは崩さない方法です。
また、マクロは使わない方法でお願いします。

回答No.2

hige_082 · ベストアンサー

出来ないと思います
関数で任意の空白と挿入による空白との区別が出来ないので

お礼

回答ありがとうございます。
色々試してみて、私の欲しかった式が出来ました。
参考として貼り付けておきます。

=IF(C4=0,,"("&IF(COUNT(MID(OFFSET(B4,-1,),2,2))=0,"01",TEXT(MID(OFFSET(B4,-1,),2,2)+1,"00"))&")")

回答No.1

hige_082

=IF(C4="","",IF(B3="",1,B3+1))
こんな感じで、如何

お礼

ありがとうございます。回答の式使ってみたのですが、式がある行と行の間に行挿入して空白ができた場合にはその空白が計算結果に反映されませんでした。行挿入後の空白も計算結果に反映できる方法をお願いします。