概述
效果展示：
自定义宏：
- 打开VBA , ALT + f11
- 插入模块，如下图
- 复制代码，并保存（ctrl + s）
VBA代码：
Function getnumber(cel As Range)
Dim reg As Object
Set reg = CreateObject("VBScript.RegExp")
With reg
.Pattern = "[^d.-]+"
.Global = True
Dim sum As Double
sum = 0
arr = Split(.Replace(cel, " "), " ")
For i = 1 To UBound(arr) - LBound(arr) - 1 Step 1
sum = sum + CDbl(arr(i))
Next
getnumber = sum
End With
End Function
自愿打赏两毛给小弟买糖吃吃（哈哈，微信）
最后
以上就是单身月饼为你收集整理的Excel获取文本中的数字并且合计的全部内容，希望文章能够帮你解决Excel获取文本中的数字并且合计所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复