マクロ 特定のセル値のみクリアする

質問

エクセルの超初心者です。
B1～K45に参加率の値が入っています。
この範囲にある 0.0％ という値のみクリアすることはできるのでしょうか？
すべてのセルを消去するには、

Sub ClearCell()
Range("B1:K45").Clear
End Sub

でいいと思うのですが、指定した値のみクリアするにはどのようなプログラムになりますか？
また例えば 5.0％以下のみの値をクリアするということもできるのでしょうか？
宜しくお願いします。

回答No.1

web2525 · ベストアンサー

一例：
データが数値として入力されているとして

Sub Macro1()
For Each c In Range("B1:K45")
If c <= 5 Then
c.Clear
End If
Next c
End Sub

これで範囲内の5以下のデーターは消去されます

お礼

回答ありがとうございます。
上記マクロ実施したところ元々あった罫線まで消えてしまいましたが、
ClearをClearContentsにすることで対応できました。
ご教授ありがとうございました。