参考サイトさんmogu「選択したセルの背景色をRGB(#RRGGBB)形式で取得する

サンプルマクロは、アクティヴセルの背景色を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

Office TANAKAさん
Hex関数
Int関数

グラフ系
Excel 2007以降のグラフ-ColorプロパティとRGB関数について
RGBで色を設定する

VBAのIE制御入門さん
mod関数については、算術演算子とはにあります。

おすすめの記事