[[20040915112925]] 『1行毎に行を1行挿入したい』(み) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『1行毎に行を1行挿入したい』(み)

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

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

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

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.