セルの書式設定(塗りつぶし)

今回は書式設定の塗りつぶしについてメモしておきます。

Interior.Colorプロパティで塗りつぶし色を設定します。
RGB関数でカラー値を取得し、設定するのが一般的な方法です。

実行プログラム

Sub Sample4_14_1()

    Cells(1, 1).Interior.Color = RGB(255, 255, 0)
    Cells(2, 1).Interior.Color = RGB(255, 204, 0)
    Cells(3, 1).Interior.Color = RGB(255, 0, 0)
    Cells(4, 1).Interior.Color = RGB(128, 0, 128)
    Cells(5, 1).Interior.Color = RGB(0, 0, 255)
    Cells(6, 1).Interior.Color = RGB(0, 255, 0)

End Sub

Sub Sample4_14_1()

Cells(1, 1).Interior.Color = RGB(255, 255, 0)

Cells(2, 1).Interior.Color = RGB(255, 204, 0)

Cells(3, 1).Interior.Color = RGB(255, 0, 0)

Cells(4, 1).Interior.Color = RGB(128, 0, 128)

Cells(5, 1).Interior.Color = RGB(0, 0, 255)

Cells(6, 1).Interior.Color = RGB(0, 255, 0)

End Sub

実行結果