エクセル2003での自動行追加について

質問

マクロを使わずに自動行追加する方法を探しています。
条件:マクロや右クリックでの行又はセルの挿入を使わずに、各最終行の次にから
3行追加を繰り返す
A1 B1
AAA 111
AAA 222
AAA 333
(ここに3行追加)
SSS 777
SSS 444
SSS 888
(ここに3行追加)

アルファベットは同一日付データ
数値は氏名データ
データは都度可変します

マクロを修得しておりませんので、何とかこの条件下でエクセルで可能な方法を探しております。
皆さま、ご教授をお願い致します。

回答No.2

weboner · ベストアンサー

>マクロや右クリックでの行又はセルの挿入を使わずに、各最終行の次にから3行追加を繰り返す

要は計算式で実行したいということですね？

ムリです

計算式はそのセルの値のみに反映します、他のセルの状態を変更することは出来ません

とんちクイズなら
答えは
リボンメニューの挿入を使えばいい
なのですが、そんな事じゃないよね？

お礼

ご回答ありがとうございます。
やはり無理ですか。
可能かどうかわかっただけでも有り難いです。
マクロを勉強してマクロの導入を検討してみます。
ありがとうございました。

回答No.1

neKo_deux

C列とD列を作業列にして、

1)

C1:=10
C2:=IF(A2=A1,C1,C1+10)　A列が上の行と同じなら上の行のC列の数字、そうでなければC列の数字+10
C3～はC2をコピペ

2)

D列は普通に連番。

すると、
C列　D列
10　　1
10　　2
10　　3
20　　4
20　　5
20　　6
～
1980　　756
1980　　757
1980　　758

とかって数字が振られます。

3)

振られた数字の末尾に続けて、
11 数値を入力
12 数値を入力
13 数値を入力
21 ←３行上の数字+10
22 ←３行上の数字+10
23 ←３行上の数字+10、以下コピペ
～
1971
1972
1973
1981
1982
1983

とかって空行を作って、全体をC列、D列でソートとか。

お礼

ご回答ありがとうございます。
私の質問が言葉不足でした。
申し訳ございません。

追加の3行は今後別データを入力する為、
空白行又は、印刷後空白になってることが条件となります。

よろしくお願い致します。