教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA セル操作】行または列を挿入(Insert)する方法を教えて!

f:id:m_kbou:20200419130832p:plain

行や列を挿入する方法について説明します。挿入するにはInsertメソッドを使います。作成済みの表へ行や列を挿入する場合に有効です。

 

 

構文

記述方法は以下の通りとなります。

Range(”[行挿入範囲]”).EntireRow.Insert

Range(”[列挿入範囲]”).EntireColumn.Insert

[説明]:

行を挿入するには「Range(”[行挿入範囲]”).EntireRow.Insert」と記述し、列を挿入するには「Range(”[列挿入範囲]”).EntireColumn.Insert」と記述します。[行挿入範囲][列挿入範囲]には挿入する行や列の範囲を記述し、「”」(ダブルクォーテーション)で囲みます。行や列を挿入するにはInsertメソッドを使用し、行を挿入する場合はEntireRow.Insertと記述し、列を挿入する場合はEntireColumn.Insertと記述します。内容を纏めると、「[行挿入範囲]や[列挿入範囲]で指定した範囲に行又は列を挿入して下さい。」との意味になります。

[記述例]:

Range("2:2").EntireRow.Insert
Range("B:B").EntireColumn.Insert

 

使い方

使い方について具体的に説明していきます。

指定した範囲へ行を挿入する方法

指定した範囲へ行を挿入する方法について説明します。

[プログラミング例]:

Sub サンプル()
    Range("2:2").EntireRow.Insert
    MsgBox "挿入しました。"
End Sub

内容は、「2行目に行を挿入し、最後にMsgBoxで”挿入しました。”のメッセージを表示して下さい。」との意味になります。

f:id:m_kbou:20210419100343p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。

[実行例]:

①1行目~4行目にデータが入力され表示されています。<実行>ボタンをクリックします。このボタンには上記のプログラミング例のプログラムが登録されています。(※ボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210419100400p:plain

②結果は以下の様になります。2行目に行が挿入され、MsgBoxで「挿入しました。」が表示されます。

f:id:m_kbou:20210419100413p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

指定した範囲へ行を挿入する方法についての説明は以上です。

 

指定した範囲へ列を挿入する方法

指定した範囲へ列を挿入する方法について説明します。

[プログラミング例]:

Sub サンプル()
    Range("B:B").EntireColumn.Insert
    MsgBox "挿入しました。"
End Sub

内容は、「B列に列を挿入し、最後にMsgBoxで”挿入しました。”のメッセージを表示して下さい。」との意味になります。

f:id:m_kbou:20210419100518p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。

[実行例]:

①1行目~4行目にデータが入力され表示されています。<実行>ボタンをクリックします。このボタンには上記のプログラミング例のプログラムが登録されています。(※ボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210419100532p:plain

②結果は以下の様になります。B列に列が挿入され、MsgBoxで「挿入しました。」が表示されます。

f:id:m_kbou:20210419100545p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

指定した範囲へ列を挿入する方法についての説明は以上です。

  

おわりに

今回は選択した範囲へ行または列を挿入する方法について説明しました。類似内容に行や列の削除方法 があります。こちらも是非一緒に覚えておいて下さい。