【ExcelVBA】列を挿入する方法（複数列範囲）Columnsプロパティ・Insertメソッド

VBAでエクセルシートの列を挿入する方法について説明します。

列を挿入する方法（１列）

列の挿入はColumnsプロパティのInsertメソッドを実行します。

削除の時と同様に、列の操作はアルファベットで指定する方法と列数の数字で指定する方法があります。

'B列に1列挿入（アルファベットで指定）
Columns("B").Insert

'2列目に1列挿入
Columns(2).Insert

▽マクロ実行前→実行後のイメージ
　どちらも結果は同じですがB列（2列目）に1列挿入されました。

複数列を挿入する方法

次は複数列挿入する方法です。

アルファベットで指定する場合はカッコ内に”B:C”のように範囲を指定します。

'B列～C列に列を挿入（アルファベットで指定）
Columns("B:C").Insert

列数の数字で指定する場合はRangeで囲んでからColumns()をカンマで区切って指定します。

'2列目～3列目に列を挿入（数字で指定）
Range(Columns(2), Columns(3)).Insert

▽マクロ実行前→実行後のイメージ
　B列～C列（2列目～3列目）に2列分挿入されました。

関連記事（行・列操作まとめ）

こちらの記事では行と列の操作をまとめています。よかったらこちらもご覧ください。

【ExcelVBA】行・列の操作まとめ（挿入Insert・削除Delete・非表示Hidden）☆複数範囲対応

エクセルVBAでよく使うシートの行や列を操作する方法についてまとめました。行・列の挿入、削除、非表示・再表示の書き方、複数行・複数列の範囲指定の書き方をそれぞれ説明しています。

learningpgm.com

2024.08.18

※コードのコピー利用について

・コードのコピーは自由におこなっていただけます。
・気を付けて作成はしていますがコードには誤りがある可能性があります。
・自身の環境で動作確認をしていますが、すべての方の環境で同様に動くことは保証できません。
・データの破損等の責任は負いかねますのでご自身の責任のもとお使いください。
・記事の内容は適宜変更することがありますのでご了承ください。