参考元:【VBA】行全体と列全体を取得【Range、EntireRow、EntireColumnを使う】
https://daitaideit.com/vba-entirerow-entirecolumn/
ポイントとなるVBAコード
'行全体
Range("A2").EntireRow.Select '2行目を選択
Range("A2:A3").EntireRow.Select '2~3行目を選択
Range("A2, A4").EntireRow.Select '2行目と4行目を選択
Range("A2, A4").EntireRow.Delete '2行目と4行目を削除
'列全体
Range("B1").EntireColumn.Select '2列目を選択
Range("B1:C1").EntireColumn.Select '2~3列目を選択
Range("B1, D1").EntireColumn.Select '2列目と4列目を選択
Range("B1, D1").EntireColumn.Delete '2列目と4列目を削除
離れた行を削除
RangeとEntireRowを組み合わせると、一括でセル範囲を削除することができます。
ちょっとやってみます。
2行目と4行目を削除するVBAコードです。
Sub TEST4()
'2行目と4行目を削除
Range("A2, A4").EntireRow.Delete
End Sub
離れた列を削除
RangeとEntireColumnを組み合わせると、一括でセル範囲を削除することができます。
2列目と4列目を削除するVBAコードです。
Sub TEST8()
'2列目と4列目を削除
Range("B1, D1").EntireColumn.Delete
End Sub