Excelのマクロで最下行を選択して「一行挿入する」マクロの記述を

Excelのマクロで最下行を選択して「一行挿入する」マクロの記述を教えてください。

ちなみにA列の一番下の行を選択し、その上に一行入れたいのです。

よろしくお願いします。

No.1 ベストアンサー 回答者： moon_piyo 回答日時： 2005/07/11 22:37

こんちは

Range("A65536").End(xlUp).EntireRow.Insert

この回答へのお礼

コピペして実行してみました。希望通りに行挿入されました。どうもありがとうございました。

お礼日時：2005/07/13 10:05

No.2 回答者： imogasi 回答日時： 2005/07/12 06:25

マクロの記録をとればよい。

一番下行を選択（一番下のデータより下で、ＥＮＤキーの後矢印キー）
６５５３６行目を指す。
ここから以下記録開始。
ＥＮＤキー
上矢印キー
挿入
行
をやればよい。
Selection.End(xlUp).Select
Selection.EntireRow.Insert
これをＳＥＬＥＣＴの重複を省いて合体させれば、＃１のご回答のようになる。

この回答へのお礼

解説ありがとうございます。なるほどです。理解できました。他にもマクロを記録しているのですが、SELECTの重複を省いてみます。どうもありがとうございました。

お礼日時：2005/07/13 10:07