Excel怎样批量提取文本中数字求和
在工作中,我们经常遇到需要从大量文本中提取数字并进行求和的情况。如果使用一般的方法,需要逐个列出数字然后再求和,这样非常费时费力。下面将介绍两种可以快速计算结果的方法。
方法一:使用宏实现批量提取数字求和
1. 首先,打开Microsoft Office Excel 2007,并新建一个文档,保存为文件名《Excel怎样批量提取文本中数字求和.xlsm》(演示文件)。
2. 按下快捷键ALT F11,打开VBE(宏)编辑界面,然后在菜单栏的【插入】下拉列表中选择【模块(M)】。
3. 在代码框中复制以下代码:
```vba
Sub 选数据批量提取数字求和()
Dim myr As Range, myrs As Range, m As String, sn, i
Set myrs Selection
For Each myr In myrs
m myr.Text
sn 0
With CreateObject("")
.Pattern "-[0-9](.[0-9]*)?|[0-9](.[0-9]*)?"
.Global True
If .Test(m) Then
For Each i In .Execute(m)
sn sn Val(i)
Next i
Else
sn "无数字"
End If
End With
(0, 1).Value sn
Next myr
End Sub
```
4. 完成以上操作后,回到工作表窗口。首先选中包含原始数据的表格,然后运行【选数据批量提取数字求和】宏(在菜单栏的【视图】中下拉列表中选择【宏】,打开宏对话框,在列表中选择该宏名,点击执行)。
5. 运行结果将会在原数据的后一列输出求和结果。
方法二:使用公式实现批量提取数字求和
1. 首先,选中一个空白单元格,输入以下公式:
```
SUM(IF(ISNUMBER(--MID(A1,FIND("-",A1) 1,LEN(A1)-FIND("-",A1))),--MID(A1,FIND("-",A1) 1,LEN(A1)-FIND("-",A1))),0)
```
2. 将公式拖动或复制到需要求和的范围内(例如整个列),即可批量提取数字并求和。
通过以上两种方法,我们可以快速而准确地从大量文本中提取数字并进行求和,提高工作效率。
版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。