/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

2 votes116 views1 answer
Vba split string
VBA
0 vote124 views1 answer
Get current year vb
VBA
0 vote128 views1 answer
For each item in folder outlook vba
VBA
18 votes174 views3 answers
Excel-vba make integer
VBA
0 vote137 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote128 views1 answer
VBA Sort RossetaCode
VBA
3 votes120 views1 answer
Excel vba get the workbook full file name with path
VBA
0 vote130 views1 answer
Vbnet cycle through charaters in string
VBA
-1 vote111 views1 answer
Text to speech vb.net
VBA
-1 vote117 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA