Remove all numbers from excel cells in worksheet

I need to remove all numbers from an excel spreadsheet

I have tried some different vba formulas but none of them work- it ends up just removing 1 number from the cell when I want to remove all numbers.

Any suggestions that would be easier than creating a formula in vba?
LVL 2
CanalInsAsked:
Who is Participating?
 
TracyConnect With a Mentor VBA DeveloperCommented:
Try this, found here: http://www.mrexcel.com/td0078.html

=RemoveNumeric(A1)


Function RemoveNumeric(Rng As String) As String
Dim Tmp As String
Dim i As Integer


Tmp = Rng
For i = 0 To 9
Tmp = Application.Substitute(Tmp, i, "")
Next i
RemoveNumeric = Tmp
End Function

Open in new window

Book1.xls
0
 
jkunreinCommented:
Unless I misunderstand your intent, wouldn't a Find and Replace do what you need?  Just search for all 0s and leave the Replace field blank.  Then search for all 1s and so forth.  You could even record a basic macro to do this with one swoop.

As long as your search requirements don't include the whole field, this should work.

If I don't fully understand your need, let us know.
0
 
CanalInsAuthor Commented:
Thank you- it worked!!!
0
All Courses

From novice to tech pro — start learning today.