/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

0 vote341 views1 answer
Vb test if reference is null
VBA
0 vote370 views1 answer
Enable macros on opening workbook vba
VBA
0 vote376 views1 answer
Power query M substract minimum value of column -dax
VBA
0 vote410 views1 answer
Excel vba unlock sheet without password
VBA
3 votes387 views2 answers
Vba date to string
VBA
0 vote403 views1 answer
Vba remove the first character of string
VBA
0 vote383 views1 answer
Build an index all files of a FTP site
VBA
0 vote391 views2 answers
Vb.net include quotes in string
VBA
0 vote348 views1 answer
Telephon call in vba
VBA
8 votes415 views1 answer
Vba make integer
VBA