/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 vote237 views1 answer
Add text to Shape VBA
VBA
0 vote263 views1 answer
.net crash app
VBA
0 vote241 views1 answer
Tester si une case est vide vba
VBA
0 vote223 views1 answer
Vba get text file content
VBA
-1 vote244 views1 answer
Code for reading letters only in vb 6
VBA
3 votes236 views1 answer
Extract the nth word from a text string
VBA
0 vote226 views1 answer
Vbnet find highest value in chart
VBA
0 vote237 views2 answers
Open url from vba
VBA
0 vote227 views1 answer
Vba open report
VBA
0 vote239 views1 answer
Excel vba open browser
VBA