[开_120][已结题]计算题——提取括号内的表达式并计算。

wshcw · 发表于 2009-9-4 23:46

要求：1、不使用辅助列，可以定义一个名称(定义的名称统一定为"计算")。
　　　2、用一个公式通过下拖得出全部结果，要求不出现错误值。
　　　3、不可与已有的答案重复或类似。否则不得分。
　　　4、必须使用公式，并用一个通用公式向右填充得出计算结果。
5、名称长度+公式长度<100字，评技术1分。

[ 本帖最后由 wshcw 于 2009-9-5 21:51 编辑 ]

neverquest · 发表于 2009-9-5 09:17

借刚结题的竞赛题做一个：(投机一下，不然公式会很长！）
定义名称：
计算=EVALUATE(INDEX(TRIM(MID(SUBSTITUTE(SUBSTITUTE($A$2,"(",REPT(" ",LEN($A$2))),")",REPT(" ",LEN($A$2))),{1,55,110,165,220,275,330},55)),COLUMN()*2))
公式:
A3=计算

[ 本帖最后由 neverquest 于 2009-9-5 09:31 编辑 ]

biaotiger1 · 发表于 2009-9-5 10:04

上传附件。。。。。。。。。。

[ 本帖最后由 biaotiger1 于 2009-9-5 10:10 编辑 ]

biaotiger1 · 发表于 2009-9-5 10:05

咋没隐藏回复捏

东方之珠0 · 发表于 2009-9-5 11:49

计算1题.rar (8.63 KB, 下载次数: 51)

=EVALUATE(MID(SUBSTITUTE(SUBSTITUTE($A3,")",REPT(" ",99)),"(",REPT(" ",99)),198*COLUMN()-99,99))

[ 本帖最后由东方之珠0 于 2009-9-5 14:05 编辑 ]

ff8feng · 发表于 2009-9-5 13:01

定义了名称
计算=evaluate(LEFT(MID($A$2,SMALL(IF(MID($A$2,ROW($1:99),1)="(",ROW($1:99)),COLUMN())+1,99),FIND(")",MID($A$2,SMALL(IF(MID($A$2,ROW($1:99),1)="(",ROW($1:99)),COLUMN())+1,99))-1))
A3=计算

感觉这题的关键是取字符串，不用上题数字格式的思路做了

x.f.zhao · 发表于 2009-9-5 14:00

计算=EVALUATE("0*("&SUBSTITUTE(SUBSTITUTE($A2,")",")+0*(0",COLUMN()),"(","0)+(",COLUMN())&")")

biaotiger1 · 发表于 2009-9-5 15:49

原帖由 x.f.zhao 于 2009-9-5 14:00 发表
计算=EVALUATE("0*("&SUBSTITUTE(SUBSTITUTE($A2,")",")+0*(0",COLUMN()),"(","0)+(",COLUMN())&")")

好公式

难道就我错了

版主也没说需要转换多个字符串啊

wjzwang · 发表于 2009-9-5 16:00

原帖由 x.f.zhao 于 2009-9-5 14:00 发表
计算=EVALUATE("0*("&SUBSTITUTE(SUBSTITUTE($A2,")",")+0*(0",COLUMN()),"(","0)+(",COLUMN())&")")

哇,转得好,学习了
我的是
=EVALUATE(MID(LEFT($A2,FIND("|",SUBSTITUTE($A2,")","|",COLUMN()))),FIND("|",SUBSTITUTE($A2,"(","|",COLUMN())),99))
114个字,参予一下

东方之珠0 · 发表于 2009-9-5 17:22

原帖由 x.f.zhao 于 2009-9-5 14:00 发表
计算=EVALUATE("0*("&SUBSTITUTE(SUBSTITUTE($A2,")",")+0*(0",COLUMN()),"(","0)+(",COLUMN())&")")

这个公式真是有点绝!服了,要不出现错误值还要加个0:
=EVALUATE("0*("&SUBSTITUTE(SUBSTITUTE($A4,")",")+0*(0",COLUMN()),"(","0)+(",COLUMN())&"0)")

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

[Excel 函数与公式] [开_120][已结题]计算题——提取括号内的表达式并计算。

评分

评分

评分

评分

评分

评分

评分