参考サイトさん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
グラフ系
Excel 2007以降のグラフ-ColorプロパティとRGB関数について
RGBで色を設定する
VBAのIE制御入門さん
mod関数については、算術演算子とはにあります。