> マクロの記録を使ってみて下さい。返答ありがとうございます。マクロの記録を使ったところ Rows("1:1").Select Selection.Insert Shift:=xlDownとなったのですが、これをそのまま使おうとしたところエラーで落ちてしまいました・・・