各位老师看看这题，谁能写出最简洁的公式？

一剑惊心 · 发表于 2021-3-22 11:53

=SUM(IFERROR(SUBSTITUTE(RIGHTB(LEFT(A2,FIND({"箱";"包";"条"},A2)),4),{"箱";"包";"条"},)*{500;1;10},))

丢丢表格 · 发表于 2021-3-22 11:58

象山海鲜发表于 2021-3-22 11:49
公式一

公式2

这种题用 EVALUATE 是唯一正解。

象山海鲜 · 发表于 2021-3-22 12:02

丢丢表格发表于 2021-3-22 11:58
这种题用 EVALUATE 是唯一正解。

嗯，就是要定义名称。
吐槽下，excel 为啥没有呢。

cinlo · 发表于 2021-3-22 12:15

丢丢表格发表于 2021-3-22 10:56
你这个可以再简化

=SUM(IFERROR(RIGHT(TEXT(MID("@"&A2,FIND({"包";"条";"箱"},A2)-{1,2,3},{2,3,4}), ...

丢丢老师太强大了，学习了，非常感谢！

cinlo · 发表于 2021-3-22 12:31

象山海鲜发表于 2021-3-22 11:49
公式一

公式2

膜拜。。。。。。。。。。

象山海鲜 · 发表于 2021-3-22 12:57

丢丢表格发表于 2021-3-22 10:56
你这个可以再简化

=SUM(IFERROR(RIGHT(TEXT(MID("@"&A2,FIND({"包";"条";"箱"},A2)-{1,2,3},{2,3,4}), ...

=SUM(IFERROR(MID(TEXT(MID("@"&A2,FIND({"包";"条";"箱"},A2)-{1,2,3},{2,3,4}),),2,9)*{1;10;500},))

复制代码

还能挖

cinlo · 发表于 2021-3-22 13:03

本帖最后由 cinlo 于 2021-3-22 13:14 编辑

象山海鲜发表于 2021-3-22 12:57
还能挖

老师，你们的公式，想得我脑壳疼！今天才知道mid,right和left在前面第一参数是2维数组的时候，最后的参数还可以是数组。。。一开始我还以为组成了3维数组呢，头很大！
谢谢老师们了！

丢丢表格 · 发表于 2021-3-22 13:09

象山海鲜发表于 2021-3-22 12:57
还能挖

对呀，是从第2位开始取的，是给 jivy1212 老师引入傍门了~~~~

袁勇 · 发表于 2021-3-22 14:13

EVALUATE通用的情况更多。

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
For i = 2 To 12
c = Replace(Replace(Replace(Cells(i, 1), "箱", "*500+"), "条", "*10+"), "包", "*1+")
Cells(i, 2) = Evaluate(c & "0")
Next
Application.ScreenUpdating = True
End Sub

复制代码

YY998632 · 发表于 2021-3-22 16:37

反正我是跪着复制的，全部保存下来了。
我觉得这题总有一天我会碰到！
学会的话这辈子不知道有机会不~~

		自动登录	找回密码
密码			免费注册

[讨论] 各位老师看看这题，谁能写出最简洁的公式？