02/04/06 22:52
でもね、それだと必ず１行おきに３個数字入れてフィルハンドルを引きずらないとできないわけ。
不定数だと面倒じゃない。それがマクロを使えれば67さｎの書いたマクロを使わしてもらうと
Sub aaa()
n=imputbox"いくつまで、好きな数字入れてね"
i = 1
Do While i <= n
ActiveCell = i
ActiveCell.Offset(2, 0).Activate
i = i + 1
Loop
End Sub
で、何回でもできるし、マクロが動いている間はほかの作業ができるのよ
エクセルは使えないけどね。