remove symbols and numbers from list of string

Is there a simpler way to remove symbols from a string?

I found the following code from previous postings:

Sub Example()
Worksheets("Sheet1").Columns("A").Replace _
What:=3D"-", Replacement:=3D"", _
SearchOrder:=3DxlByColumns
End Sub


I tried adding these in the code:

What:=3D"=A3", Replacement:=3D"", _
What:=3D"$", Replacement:=3D"", _
What:=3D"%", Replacement:=3D"", _
What:=3D"/", Replacement:=3D"", _

But it doesnt work. It said "Named argument not found"

Is there anyway to delete all the symbols from a column with lists of
strings such as:

123 Oxford Street to Oxford Street
2 Abbey Road to Abbey Road
Apple-pie to Applepie
Ice-Cream to Icecream
easy.jet to easyjet

1=2E need to delete all the symbols from a string
2=2E need to delete all the numbers from a string

Please help.

Check out the Excel Add-in called ASAP Utilities..........it's available free
at www.asap-utilities.com

It has a feature to do just what you want.......

Vaya con Dios,
Chuck, CABGx3



"elaine" wrote:

> Is there a simpler way to remove symbols from a string?
>
> I found the following code from previous postings:
>
> Sub Example()
> Worksheets("Sheet1").Columns("A").Replace _
> What:="-", Replacement:="", _
> SearchOrder:=xlByColumns
> End Sub
>
>
> I tried adding these in the code:
>
> What:="£", Replacement:="", _
> What:="$", Replacement:="", _
> What:="%", Replacement:="", _
> What:="/", Replacement:="", _
>
> But it doesnt work. It said "Named argument not found"
>
> Is there anyway to delete all the symbols from a column with lists of
> strings such as:
>
> 123 Oxford Street to Oxford Street
> 2 Abbey Road to Abbey Road
> Apple-pie to Applepie
> Ice-Cream to Icecream
> easy.jet to easyjet
>
> 1. need to delete all the symbols from a string
> 2. need to delete all the numbers from a string
>
> Please help.
>
>