The character that is causing the issue is a Carriage return, i think it only shows when you go into the cell and press enter as the cell recalculates at that point



With the quick test that i have done the below code seems to remove them



Sub cr_remove()

Range("a:a").Replace what:=Chr(13), Replacement:=" ", _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False

End Sub