Question

Excel怎么批量提取文本中的数字后相加？

Answer 1

第一步，先将B列数据复制到Word中，粘贴方式为【链接与使用目标格式】

第二步，同时按下【Ctrl】+【H】键，弹出替换框，在查找内容框中输入："[!0-9]"，点击【更多】按钮，勾选【使用通配符】，点击【全部替换】，即可将文本中的非数字全部替换为空。

通配符[0-9]表示0-9之间的数字，前面"!"表示非的意思，非0-9，非数字全部被替换，只会留下数字，这是再将数字复制回Excel单元格即可。

Answer 2

'自定义公式-按ALT+F11-插入模块-粘贴代码-将表格另存为启用宏的格式
Function 求和(c As String)
a = Split(c, ",")
For i = 0 To UBound(a)
d = 0
For j = 1 To Len(a(i))
b = Mid(a(i), j, 1)
If b Like "[0-9]" Or b = "." Then d = d & b
Next
求和 = 求和 + d * 1
Next
End Function

Answer 3

有没有文件提供下，你这问题太模糊

追问

大概是这样。

追答

加个辅助单元格，公式会相对简单点，b1=SUMPRODUCT(ISERROR(--MID(A1,ROW($1:$99),1))*ISNUMBER(--MID(A1,ROW($2:$100),1)))
结果=SUM(--MID(A1,SMALL(IF(ISERROR(--MID(A$1,ROW($1:$99),1))*ISNUMBER(--MID(A$1,ROW($2:$100),1)),ROW($2:$100)),ROW(INDIRECT("1:"&B1))),SMALL(IF(ISNUMBER(--MID(A$1,ROW($1:$99),1))*ISERROR(--MID(A$1,ROW($2:$100),1)),ROW($1:$99)),ROW(INDIRECT("1:"&B1)))-SMALL(IF(ISERROR(--MID(A$1,ROW($1:$99),1))*ISNUMBER(--MID(A$1,ROW($2:$100),1)),ROW($2:$100)),ROW(INDIRECT("1:"&B1)))+1))数组公式，同时按ctrl+shift+回车结束，公式均可下拉