Excel VBA Color Cell
Excel VBA Color Cell
June 2020
Sub ColCel()
Dim nr As String
For i = 3 To 66
nr = Cells(i, 5).Value
For j = 3 To 81
Select Case nr
' Coloring cells in column 1 where they have words equal to those in column 1
Cells(j, 1).Interior.ColorIndex = 37
Case Else
'do nothing'
End Select
Next j
Next i
End Sub
Bibliography
Jelen, B., Syrstad, T. 2016. Excel 2016 VBA and Macros. Pearson Education.