HOME > 即効テクニック > Excel VBA > セル操作関連のテクニック > 選択したセルの背景色をRGB(#RRGGBB)形式で取得する

即効テクニック
セル操作関連のテクニック

選択したセルの背景色をRGB(#RRGGBB)形式で取得する

(Excel 97/2000)
サンプルマクロは、アクティヴセルの背景色をRGB(#RRGGBB)形式で取得します。

Sub Sample()

    Dim myR As Long
    Dim myG As Long
    Dim myB As Long
    Dim myColor As Long
    
    myColor = ActiveCell.Interior.Color
    
    myR = myColor Mod 256
    myG = Int(myColor / 256) Mod 256
    myB = Int(myColor / 256 / 256)
    
    MsgBox "#" & Right("0" & Hex(myR), 2) & _
        Right("0" & Hex(myG), 2) & _
        Right("0" & Hex(myB), 2)

End Sub





	






ビジネス統計スペシャリスト







VBAエキスパート