【エクセルマクロ】セルの塗りつぶしを解除する：コピペで使えるコード

エクセルマクロで、セルの塗りつぶしを解除するVBAコードをご紹介します。

セルを「塗りつぶしなし」に設定します。

このページのマクロコードは、コピペで使えます。
せひ、お試しください。

セルの塗りつぶしを解除する

以下のExcelVBAを実行すると、セルの塗りつぶしを解除します。


Sub セルの塗りつぶしをクリアする()
 
    Dim MyRange As Range
 
    '指定範囲
    For Each MyRange In Range("A1:F21")
 
        'セルの背景色に色がついていたら
        If MyRange.Interior.Color <> xlNone Then
         
            'セルを色なしに設定する
            MyRange.Interior.Color = xlNone
 
        End If
    Next
 
End Sub