How to remove only cells with numeric values from range

puzzled on this.......

I have three columns with data. Some cells are just words, some are words with a number ("4 lights"), and others are just prices ("$20.00"). How can I clear ONLY the cells that have prices? I tried a few scripts and a PUPMac delete all numeric, but they remove the numbers from cells with alphanumeric data.

suggestion?

Try highlighting all 3 columns
Press CTRL + G
Click Special
Select Constans - Numbers
OK
Right click a highlighted cell, Clear contents.

That was it Jonmo......Thanks!

also figured this out in VBA:

Sub clear()

For Each Cell In Selection
If IsNumeric(Cell) Then
Cell.Value = ""
End If
Next
End Sub

You're welcome..

If it must be VBA, try using the macro recorder while doing the steps I described.

That would give you some code that does the task without having to loop through all the cells.