VBA 列をクリアする

はじめに

Excel VBA マクロの列をクリアする方法を紹介します。

Columns.Clear メソッドか Range.Clear メソッドで列をクリアできます。

列を取得するには「列を取得する」をご覧ください。
列を削除するには「列を削除する」をご覧ください。

目次
- 列をクリアする
- 列の範囲をクリアする
- 指定したシートの列をクリアする

列をクリアする

列をクリアするメソッドはいくつもあります。クリアする目的にあったものを使用します。

メソッド名	クリアするもの
Clear	全て
ClearComments	コメント
ClearContents	値と数式
ClearFormats	書式 (色や罫線、条件付き書式など)
ClearNotes	コメント
ClearOutline	アウトライン
ClearHyperlinks (Excel 2010 以降)	ハイパーリンク

Columns の引数に列番号を指定すると、その列をクリアできます。

列「B」をクリアするには Columns(2).Clear または Columns("B").Clear のように指定します。


Columns(2).Clear
Columns("B").Clear

Range.EntireColumn を使用すると、指定したセルの列を取得できます。

セル「A1」の列をクリアするには Range("A1").EntireColumn.Clear のように指定します。


Range("A1").EntireColumn.Clear

列の範囲をクリアする

列の範囲「B ～ C」をクリアするには Range("B:C").Clear または Range(Columns(2), Columns(3)).Clear のように指定します。


Range("B:C").Clear                  ' 列「B ～ C」をクリア
Range(Columns(2), Columns(3)).Clear ' 列「B ～ C」をクリア
Range("D:D").Clear                  ' 列「D」をクリア

全てのセルをクリアするには Cells.Crear のように指定します。


Cells.Clear

指定したシートの列をクリアする

Columns.Clear とコードに書くと、アクティブなシートの列をクリアします。これは ActiveSheet.Columns.Clear の ActiveSheet が省略されています。


' どちらも同じコード
Columns(1).Clear
ActiveSheet.Columns(1).Clear

シートを指定するには Sheets の引数にシート名またはインデックスを指定します。

Sheet1 のシートを指定するには、Sheets("Sheet1") か Sheets(1) と書きます。


' Sheet1 の列「A」をクリア
Sheets("Sheet1").Columns(1).Clear
Sheets(1).Columns(1).Clear

' Sheet2 の列「A」をクリア
Sheets("Sheet2").Columns(1).Clear
Sheets(2).Columns(1).Clear