Is there a way to program a deletion in a series of cells?

I have rows of data that start with a underscore and I want
to find an efficient way to delete them. Any suggestions?

For example:
A
_40295
_40296
_9000143
_60000

I thought I could use a macro, but it only takes the
value "40295" and copies it in every cell.

Thanks for your help.
Alex