Clearing contents in a cell based on partial text in the cell

[nvond04]

When the text below is pasted into excel each line goes into a single cell. I am trying to get a macro that would find each cell that contains "SPD" and clear all the contents from that cell.

SPD-LNACLS 1
SPD-OPHOSE 1
68259705AD 1
68282472AF 1
0SPD-ACS 2

Thank you for any help that can be offered.

 

[Fluff]

How about

Sub nvond()
   Range("A:A").Replace "*SPD*", "", xlWhole, , False, , False, False
End Sub

 

[nvond04]

How about

Sub nvond()
   Range("A:A").Replace "*SPD*", "", xlWhole, , False, , False, False
End Sub

That was perfect. Thank you very much!

 

[Fluff]

You're welcome & thanks for the feedback.