Delete first two characters "=+" from each cell in column A.What is wrong with my code?

Hello,
I'm trying to delete first 2 characters from each cell in column A if those 2 characters are =+
Example
=+SUM
SUM
=+TEST
STRING

output in column A should be:
SUM
SUM
TEST
STRING

Thank you.



Sub Delete_characters()
Dim c As Range
Application.ScreenUpdating = False
For Each c In Range("A1", Range("A" & Rows.Count).End(xlUp))

If Left(c, 2) = "=+" Then c = Right(c, Len(c) - 2)

Next c
Application.ScreenUpdating = True
End Sub