注:WPS excel和微软的自定义函数一样,以下截图都是Excel中截图的,wps操作一致。文章末尾有wps宏启动教程
效果展示:
自定义宏:
- 打开VBA , ALT + f11
- 插入模块,如下图
- 复制代码,并保存(ctrl + s)
VBA代码:
Function getnumber(cel As Range)
Dim reg As Object
Set reg = CreateObject("VBScript.RegExp")
With reg
.Patter
效果展示:
自定义宏:
VBA代码:
Function getnumber(cel As Range)
Dim reg As Object
Set reg = CreateObject("VBScript.RegExp")
With reg
.Patter