■書式1
Columns(Index).Insert(Shift,CopyOrigin)
■書式2
object.EntireColumn.Insert(Shift,CopyOrigin)
object・・・・Rangeオブジェクト Index・・・・・対象となる列番号
Shift・・・・・セルと移動する方向(省略可) CopyOrigin・・・・・コピー元(省略可)
■以下3パターンのコードは全て同じ結果となる
'パターン1 Columns(3).Insert 'パターン2 Columns(C:C).Insert 'パターン3 Columns("C1").EntireColumn.Insert