1、去除字符串中的数字
Function aa(sr As Range)Set reg = CreateObject("vbscript.regexp")With reg.Global = True.Pattern = "\d+"End Withaa = reg.Replace(sr, "")
End Function
[VBA]利用正则表达式创建函数处理字符串
原文：http://www.cnblogs.com/susuye/p/7197857.html
