ClearColor

Summary

指定した範囲のセルの背景色をクリアする関数です。

Function ClearColor(rngR As Range)
'セルの色設定をクリアする
    With rngR.Interior
                    .Pattern = xlNone
                    .TintAndShade = 0
                    .PatternTintAndShade = 0
    End With
End Function

説明

このコードは、指定した範囲のセルの背景色をクリアするための関数です。
rngR引数で指定したセル範囲の背景色をxlNoneに設定し、濃度とパターンも初期化します。
この関数は、セルの背景色をクリアする際に便利です。

引数

• rngR (Range型): 背景色をクリアする対象のセル範囲

戻り値

• なし

Examples

使用例として、指定したセルの背景色をクリアする方法が示します。

' A1セルの背景色をクリアする
ClearColor Range("A1")

' B2:C5のセル範囲の背景色をクリアする
ClearColor Range("B2:C5")