找回密码
 立即注册
搜索
123
返回列表 发新帖
楼主: 一若一金

文字数字组合的如何提取数字求和?

27
回复
864
查看
[复制链接]

0

主题

8

帖子

0

幻币

初入江湖

Rank: 1

积分
0
2022-2-8 02:39:14 显示全部楼层
=SUM(IFERROR(--MID(SUBSTITUTE(SUBSTITUTE(TRIM(MID(SUBSTITUTE(A3,",",REPT(" ",100)),(ROW(1:99)-1)*100+1,100)),"件",""),"色",""),2,99),"")) 数组,三键结束
PPT学习论坛
回复 支持 反对

使用道具 举报

2

主题

7

帖子

4

幻币

初入江湖

Rank: 1

积分
12
2022-2-10 19:03:05 显示全部楼层
数组中的“色”“件”解释一下吗?有时候可能会替换成其他名称,格式不变。
PPT学习论坛
回复 支持 反对

使用道具 举报

1

主题

9

帖子

1

幻币

初入江湖

Rank: 1

积分
11
2022-2-12 23:06:54 显示全部楼层
拆成数组"紫色3件";"蓝5件";"青7件";"绿色12件";"黄66件";"橙12件";"红色99件"后替换掉“色”和“件"方便提取中间的数字
PPT学习论坛
回复 支持 反对

使用道具 举报

1

主题

4

帖子

2

幻币

初入江湖

Rank: 1

积分
6
2022-2-13 04:35:56 显示全部楼层
=SUM(IFERROR(--RIGHT(TEXT(MID(SUBSTITUTE(D3,"件",REPT(" ",9)),ROW(1:199),9),),8),))
PPT学习论坛
回复 支持 反对

使用道具 举报

1

主题

7

帖子

1

幻币

初入江湖

Rank: 1

积分
6
2022-2-14 23:45:47 显示全部楼层
Sub RegExp()
  Dim RegExp, Match, iMatch, MhVal$, SumMh%, i%
  For i = 2 To Range("A" & Rows.Count).End(xlUp).Row
  Set RegExp = CreateObject("vbscript.regexp")
  RegExp.Pattern = "(\d+)"
  RegExp.Global = True
  Set Match = RegExp.Execute(Cells(i, 1))
  If Match.Count > 0 Then
    For Each iMatch In Match
      MhVal = iMatch.submatches(0)
      SumMh = SumMh + Val(MhVal)
    Next
  End If
  Cells(i, 2) = SumMh
  SumMh = 0
  Next i
End Sub
工作簿1.zip (16.06 KB, 下载次数: 53)
PPT学习论坛
回复 支持 反对

使用道具 举报

0

主题

5

帖子

0

幻币

初入江湖

Rank: 1

积分
5
2022-2-17 08:43:57 显示全部楼层
=EVALUATE(SUBSTITUTE(TRIM(CONCAT(MIDB(A3,ROW($1:$99),1)))," ","+")) 三键结束
PPT学习论坛
回复 支持 反对

使用道具 举报

1

主题

9

帖子

2

幻币

初入江湖

Rank: 1

积分
13
2022-2-26 22:32:07 显示全部楼层
=SUMPRODUCT(--TEXT(MID(TEXT(MID(SUBSTITUTE(A3,"件",REPT(" ",9)),ROW($1:$88),9),),2,8),"[>];;0;!0"))
PPT学习论坛
回复 支持 反对

使用道具 举报

0

主题

9

帖子

0

幻币

初入江湖

Rank: 1

积分
9
2022-3-2 18:16:11 显示全部楼层
这个问题我回答了很多次了,在不规则的文本中提取字符,非正则表达式公式莫属。
使用方法如图所示
PPT学习论坛
回复 支持 反对

使用道具 举报

123
您需要登录后才可以回帖 登录 | 立即注册