概要
ClearContents
はRange
オブジェクトのメソッド。
- セルの「値・数式・コメント以外の内容」を消します(コメントは残ります)。
- セルの書式やメモ、コメントは消さない。
使い方
Range("A1").ClearContents ' A1セルの中身だけクリア
Range("B2:D5").ClearContents ' 複数セルの中身をクリア
ClearContentsと似ているメソッドとの違い
メソッド | 内容 | 書式・コメント | 書式設定(色など) |
---|
ClearContents | セルの値や数式を削除(セルの内容だけ) | 残る | 残る |
Clear | セルの内容と書式、コメントまで全て削除 | 消える | 消える |
Delete | セル自体を削除して、下や右のセルを詰める | 詰められる | 詰められる |
実用例
1. 単一セルの内容をクリア
Range("A1").ClearContents
2. 複数セルの内容をクリア
Range("A1:C3").ClearContents
3. 変数を使って範囲指定
Dim rng As Range
Set rng = Worksheets("Sheet1").Range("B2:D5")
rng.ClearContents
4. 条件付きでクリア
Dim cell As Range
For Each cell In Range("A1:A10")
If cell.Value < 0 Then
cell.ClearContents
End If
Next cell
注意点
ClearContents
は中身だけ消すので、セルの背景色やフォント色、セルのコメントはそのまま残ります。
- 完全にセルを初期状態に戻したいなら
Clear
を使う。
ClearContents
はエラーにはなりにくい安全な方法。
まとめ
メソッド | 役割 | 備考 |
---|
ClearContents | セルの値・数式のみクリア | 書式やコメントは残る |
Clear | セルの値・書式・コメントすべてクリア | 完全にクリアしたいとき |
Delete | セル自体を削除しセルを詰める | 行や列の削除と似た効果 |