Syntax for else elsif advice for £ character

[ipbr21054]

I have this code in use below.
Im having an issue with £ charcter where it just turns to yellow as its incorrect syntax i assume.

Can you advise please

Dim Cell As Range
For Each Cell In Range("L:L")
  If Cell = "TO DO" Then
     Cell.Interior.Color = vbRed
    
  ElseIf Cell = "DONE" Then
     Cell.Interior.Color = vbBlue
    
  ElseIf Cell = ("£") Then
     Cell.Interior.Color = vbGreen
    
  End If
  Next Cell

Application.ScreenUpdating = True

 

[ipbr21054]

@dmt32
I have applied the code you advised thanks & i can say it works but i see one issue.

My table is currectly A5:L27 BUT i see column L have the White background applied still upto row 31,see screenshot

I change the lines as shown as was to dark & now im able to select a lighter color by using Interior.ColorIndex

    For Each Cell In Cells(5, "L").Resize(Cells(Rows.Count, "L").End(xlUp).Row)
    
        If Cell.Text = "TO DO" Then
            Cell.Interior.ColorIndex = 4 ' GREEN
            
        ElseIf Cell.Text = "DONE" Then
            Cell.Interior.ColorIndex = 33 ' BLUE
            
        ElseIf Cell.Text Like "£*" Then
            Cell.Interior.ColorIndex = 3 ' RED
        Else
        Cell.Interior.ColorIndex = 2 ' WHITE
        End If
        
    Next Cell

 

[dmt32]

I added that line thinking you may want to restore the colour to white - just delete the line if not wanted

Dave

 

[ipbr21054]

Ah ok thanks.
Strange it does what it does even though it’s outside of the table.
Nice to use it so will change the colour & have it the same all under the table.