'Example use of the iColor function to get the background color of selected cells Sub Get_Background_Color_Selection_Cells() Dim Rng As Range For Each Rng In Selection.Cells Rng.Offset(0, 1).Value = iColor(Rng, "HEX") Rng.Offset(0, 2).Value = iColor(Rng, "RGB") Next End Sub
Preview:
downloadDownload PNG
downloadDownload JPEG
downloadDownload SVG
Tip: You can change the style, width & colours of the snippet with the inspect tool before clicking Download!
Click to optimize width for Twitter