Attribute VB_Name = "testFuncGraphicsRGB"
Sub RGB�֐�()
    Range("B2").Value = "Test"
    Range("B2").Interior.Color = RGB(255, 0, 0)
    Range("B2").Font.Color = RGB(255, 255, 255)
    Range("C2").Interior.Color = RGB(128, 64, 64)
End Sub