VBA セルの書式をクリアする

はじめに

Excel VBA マクロのセルの書式をクリアする方法を紹介します。

Range.ClearFormats 関数か Cells.ClearFormats 関数でセルの書式をクリアできます。

• セルをクリアするには「セルをクリアする」をご覧ください。
• セルの色だけをクリアするには「セルの色をクリアする」をご覧ください。
• セルの罫線だけをクリアするには「セルの罫線をクリアする」をご覧ください。

セルの書式をクリアする

ClearFormats 関数を使用すると「色」や「罫線」、条件付き書式など全ての書式がクリアされます。

Range の引数にセル名を指定すると、そのセルの書式をクリアします。

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

Range("A1").ClearFormats

Cells の引数にセルの行と列の番号を指定すると、そのセルの書式をクリアします。

行「2」、列「A」の書式をクリアするには Cells(2, 1).ClearFormats のように指定します。

Cells(1, 1).ClearFormats ' A1
Cells(2, 1).ClearFormats ' A2
Cells(1, 2).ClearFormats ' B1
Cells(2, 2).ClearFormats ' B2

セルの範囲の書式をクリアする

セルの範囲「A1」～「B2」の書式をクリアするには Range("A1:B2").ClearFormats または Range("A1", "B2").ClearFormats のように指定します。

Range("A1:B2").ClearFormats
Range("A1", "B2").ClearFormats

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

Cells.ClearFormats

スポンサーリンク

指定したシートのセルの書式をクリアする

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

' どちらも同じコード
Range("A1").ClearFormats
ActiveSheet.Range("A1").ClearFormats

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

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

' Sheet1 のセル「A1」の書式をクリア
Sheets("Sheet1").Range("A1").ClearFormats
Sheets(1).Range("A1").ClearFormats

' Sheet2 のセル「A1」の書式をクリア
Sheets("Sheet2").Range("A1").ClearFormats
Sheets(2).Range("A1").ClearFormats