[VBA]利用正则表达式创建函数处理字符串


1、去除字符串中的数字

Function aa(sr As Range)
Set reg = CreateObject("vbscript.regexp")
With reg
.Global = True
.Pattern = "\d+"
End With
aa = reg.Replace(sr, "")

End Function

 


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM