VBA：セルの挿入

セルの挿入は次の方法で行います。

引数なし

Sub test()
     Range("A1").Insert
End Sub

 行の挿入

Sub test()
     Range("A1").EntireColumn.Insert
End Sub

 列の挿入

Sub test()
     Range("A1").EntireRow.Insert
End Sub

引数を指定しない場合、列数と行数の関係で挿入方向が決まります。

行数 = 列数	下方向にシフト
行数 < 列数	下方向にシフト
行数 > 列数	右方向にシフト

行数 = 列数のイメージ

Sub test()
     Range("A1:A1").Insert
End Sub

 行数 < 列数のイメージ

Sub test()
     Range("A1:E1").Insert
End Sub

 行数 > 列数のイメージ

Sub test()
     Range("A1:A5").Insert
End Sub