セルの背景色を設定

Sub setBackgroundColor()
    'セルの背景色をグレーに設定
    Range("B2").Interior.ColorIndex = 15
End Sub

ray88.hatenablog.com