Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "h" Then
Target.Interior.Color = vbGreen
ElseIf Target.Value = "s" Then
Target.Interior.Color = vbRed
ElseIf Target.Value = "v" Then
Target.Interior.Color = vbBlue
End If
I've got my coding working for individual cells but fails when multiple cells are selected. What can be done to fix this.
So, for example I select range A5:A9 and type h all cells of this range should have an h and blue.
Thanks