Im trying to remove all numbers, emails and web addresses from a string.


This is kind of what im doing now which I think is ridiculous, there's got to be an easier way to remove all numbers.... with less code.


OldString = Replace(NewString, "0", "")
OldString = Replace(NewString, "1", "")
OldString = Replace(NewString, "2", "")
OldString = Replace(NewString, "3", "")
OldString = Replace(NewString, "4", "")
OldString = Replace(NewString, "5", "")
OldString = Replace(NewString, "6", "")
OldString = Replace(NewString, "7", "")
OldString = Replace(NewString, "8", "")
OldString = Replace(NewString, ".com", "")
OldString = Replace(NewString, ".net", "")
OldString = Replace(NewString, "www.", "")