行の挿入・削除｜マクロ記録でVBA

公開日：2013年5月以前　最終更新日：2014-12-01

第16回.行の挿入・削除

行の挿入と、行の削除をやってみましょう、

では、マクロの記録です。

１．マクロの記録

２．１行目を選択

３．「挿入」・・・Ctrl + Shift + +

４．A列を選択

５．「挿入」・・・Ctrl + Shift + +

６．１行目を選択

７．「削除」・・・Ctrl + Shift + -

８．A列を選択

９．「削除」・・・Ctrl + Shift + -

10．記録終了

作成れたマクロは、





Sub Macro1()
'
' Macro1 Macro
'

'
　　Rows("1:1").Select
　　Selection.Insert Shift:=xlDown, 
CopyOrigin:=xlFormatFromLeftOrAbove
　　Columns("A:A").Select
　　Selection.Insert 
Shift:=xlToRight, 
CopyOrigin:=xlFormatFromLeftOrAbove
　　Rows("1:1").Select
　　Selection.Delete 
Shift:=xlUp
　　Columns("A:A").Select
　　Selection.Delete 
Shift:=xlToLeft
End Sub

見ずらいので、まずは消し込み

SelectとSelectionの消し込みは良いですね。





Sub Macro1()
　　Rows("1:1").Insert Shift:=xlDown, 
CopyOrigin:=xlFormatFromLeftOrAbove
　　Columns("A:A").Insert Shift:=xlToRight, 
CopyOrigin:=xlFormatFromLeftOrAbove
　　Rows("1:1").Delete 
Shift:=xlUp
　　Columns("A:A").Delete Shift:=xlToLeft
End 
Sub

Rows("1:1")

これは、行全体の選択になります。

Rows("1:3")とすれば、1～3行の選択になります。

Columns("A:A")

列全体の選択になります。

Columns("A:C")とすれば、A～C列の選択になります。

Insert

挿入になります。

行挿入も、列挿入も、このInsertになります。

Shift:=xlDown

Shift:=xlToRight
挿入行・列以降の移動方向です。

ここでは、

行挿入は、xlDownで下

列挿入は、xlToRightで右

CopyOrigin:=xlFormatFromLeftOrAbove
挿入した行・列に適用する書式のコピー元を指定します。

この指定は、左の列、まくたは、上の行ということです。

右の列、または、下の行の場合は、xlFormatFromRightOrBelow

勝利ゃした場合は、xlFormatFromLeftOrAboveになります。

Delete

行削除も、列削除も、このDeleteになります。

Shift:=xlUp
Shift:=xlToLeft
挿削除・列削除の移動方向です。

ここでは、

行削除は、xlUpで上

列削除は、xlToLeftで左

上のプログラム、よく考えると無駄が多いですよね。

行の挿入したら、それ以降は下に移動するに決まっているし、

行削除すれば、上に移動すねに決まっていますから。

そうです、これらの指定は不要です。

つまり、





Sub Macro1()
　　Rows("1:1").Insert

　　Columns("A:A").Insert

　　Rows("1:1").Delete

　　Columns("A:A").Delete

End Sub

.Insert、.Delete

これだけで良いのです、簡単ですね。

マクロでは、使う頻度が高いので、ぜひ覚えて下さい。

同じテーマ「マクロの記録でVBA」の記事

第13回.罫線を引く
 第14回.行列を入れ替えて貼り付け
 第15回.いろいろな消去
第16回.行の挿入・削除
第17回.並べ替え
 第18回.オートフィルタ
 第19回.オートフィルタ2
第20回.ジャンプのセル選択
 第21回.条件付き書式
 第22回.シートの移動コピー
 第23回.セルの結合

アクセスランキング・・・ランキング一覧を見る

1.最終行の取得（End,Rows.Count）｜VBA入門
2.日本の祝日一覧｜Excelリファレンス
3.変数宣言のDimとデータ型｜VBA入門
4.FILTER関数（範囲をフィルター処理）｜エクセル入門
5.RangeとCellsの使い方｜VBA入門
6.繰り返し処理（For Next)｜VBA入門
7.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
8.マクロとは？VBAとは？VBAでできること｜VBA入門
9.セルのクリア（Clear,ClearContents）｜VBA入門
10.メッセージボックス(MsgBox関数)｜VBA入門

このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
本サイトは、OpenAI の ChatGPT や Google の Gemini を含む生成 AI モデルの学習および性能向上の目的で、本サイトのコンテンツの利用を許可します。
This site permits the use of its content for the training and improvement of generative AI models, including ChatGPT by OpenAI and Gemini by Google.

マクロ記録でVBA
行の挿入・削除

第16回.行の挿入・削除

同じテーマ「マクロの記録でVBA」の記事

新着記事NEW ・・・新着記事一覧を見る

アクセスランキング・・・ランキング一覧を見る

第16回.行の挿入・削除

同じテーマ「マクロの記録でVBA」の記事

新着記事NEW ・・・新着記事一覧を見る

アクセスランキング ・・・ ランキング一覧を見る

アクセスランキング・・・ランキング一覧を見る