[[20040915112925]]　『１行毎に行を１行挿入したい』（み）　ページの最後に飛ぶ

『１行毎に行を１行挿入したい』（み）

連続するデータが入力されています。
各行ごとに新規で１行を挿入するにはどうすればよいでしょうか。

出来ればマクロでも構いませんので、簡単な方法を教えてください。
よろしくお願いします。

EXCEL97、Win98

[[20040422122639]]『表に一行おきに行を挿入したい』（腱鞘炎）

 上記スレが参考になると思います。
 (ろん)

簡単に挿入できました。
ありがとうございます。（み）

 >出来ればマクロでも構いませんので、簡単な方法を教えてください。
付録v(=∩_∩=)v
（夏目雅子似）
Sub 挿入()
Dim MyRow As Long, r As Long
r = Range("A65536").End(xlUp).Row
    For MyRow = r To 1 Step -1
        Rows(MyRow).EntireRow.Insert
    Next
End Sub

コメント返信：

[ 一覧(最新更新順) ]

[[20040915112925]] 『１行毎に行を１行挿入したい』（み） ページの最後に飛ぶ

[[20040915112925]]　『１行毎に行を１行挿入したい』（み）　ページの最後に飛ぶ