Vba: セルから塗りつぶしの色を削除する方法

VBA で次の基本構文を使用すると、特定の範囲のセルから境界線を削除できます。

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

この特定の例では、範囲A1:B12内のセルからすべての塗りつぶしの色を削除します。

次の例は、この構文を実際に使用する方法を示しています。

例: VBA を使用してセルから塗りつぶしの色を削除する

さまざまなバスケットボール選手に関する情報を含む次のデータセットが Excel にあるとします。

A1:B12の範囲内の各セルから塗りつぶしの色を削除するとします。

これを行うには、次のマクロを作成できます。

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

このマクロを実行すると、次の出力が表示されます。

A1:B12の範囲内の各セルの塗りつぶしの色が削除されていることに注意してください。

別の範囲のセルから塗りつぶしの色を削除するには、マクロ内のA1:B12 を別の範囲に置き換えるだけです。

注: VBA Interior.Colorプロパティの完全なドキュメントはここにあります。

追加リソース

次のチュートリアルでは、VBA を使用して他の一般的なタスクを実行する方法について説明します。

VBA: セルの境界線を削除する方法
VBA: ワークブック内のシート数を数える方法
VBA: 範囲内の行数をカウントする方法