/VBA/Excel vba highlight cells using the hex color value within the cells

Excel vba highlight cells using the hex color value within the cells

'VBA function to color cells in selected range based on the hex
'color number entered in each cell. For example, #FF69B4

Sub ColorCellsByHex()
    Dim r
    If TypeName(Selection) <> "Range" Then Exit Sub
    For Each r In Selection
        r.Interior.Color = Abs(("&H" & Mid(r, 6, 2) & Mid(r, 4, 2) & Mid(r, 2, 2)))
    Next
End Sub

Source: academy.excelhero.com

Similar codes

1 vote303 views1 answer
Excel vba autofit
VBA
0 vote296 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA
1 vote313 views1 answer
VBA Loop through recordset
VBA
0 vote335 views1 answer
Excel vba copy range with filter
VBA
0 vote331 views1 answer
Iterate all file in a folder vba
VBA
1 vote295 views1 answer
Textbox find and replace vb
VBA
0 vote316 views1 answer
Excel vba round to whole number
VBA
0 vote306 views1 answer
Vba border weight
VBA
0 vote315 views1 answer
Excel vba calculate
VBA
0 vote311 views1 answer
VB Error Code BC30201
VBA