/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 vote327 views1 answer
Vba word open document read only
VBA
0 vote382 views1 answer
Vba nested dictionary
VBA
1 vote333 views1 answer
Vba refresh pivot table
VBA
0 vote319 views1 answer
Excel autofilter vba
VBA
0 vote310 views1 answer
Excel vba milliseconds
VBA
0 vote335 views1 answer
Vbnet check if string is only numbers
VBA
0 vote373 views1 answer
Move bindingnavigator vb
VBA
0 vote369 views1 answer
Vba is integer
VBA
0 vote351 views1 answer
How to convert weeks to days into textbox with VB site:stackoverflow.com
VBA
0 vote346 views1 answer
Xlbycolumns is not declared
VBA