OfficeType

VBA~セルに文字色、背景色を設定しよう~Excel

VBAでセルに文字色を設定したい時はRange.Font.Colorプロパティで設定できます。セルに背景色を設定したい時は Range.Interior.Colorプロパティで設定できます。

文字色

下のコードを実行するとセルA1の文字色が赤に設定されます。

Sub test1()

Range("A1").Font.Color = RGB(255, 0, 0)

End Sub

image-01

image-02

背景色

下のコードを実行するとセルA1の背景色が赤に設定されます。

Sub test2()

Range("A1").Interior.Color = RGB(255, 0, 0)

End Sub

image-03

image-04

範囲に色を設定する

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。

下のコードを実行するとセルA1からセルC3の範囲の背景色が赤に設定されます。

Sub test3()

Range("A1:C3").Interior.Color = RGB(255, 0, 0)

End Sub

image-05

image-06

指定したシートのセルに色を設定

シートを指定するときはWorksheets("シート名")で指定できます。

下のコードを実行するとSheet2のセルA1の背景色が赤に設定されます。

Sub test4()

Worksheets("Sheet2").Range("A1").Interior.Color = RGB(255, 0, 0)

End Sub

image-07

image-08

ブックを指定して色を設定

ブックを指定するときはWorkbooks("ブック名")で指定できます。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1のセルA1の背景色が赤に設定されます。

Sub test5()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Interior.Color = RGB(255, 0, 0)

End Sub