求助！求出算式的值并根据算式变化~~~

level 3

freepig3 楼主

比如说A列是很多不同的算式，需要在B列对应显示出算式的值，
并且算式变化，值也会变化。。
我看了一个“定义名称”的方法，就是用EVALUATE定义名称。
但是我的算式很多，每一个都需要定义一次名称太麻烦了，有什么其他好的方法没！！
谢谢大神啊！！！

2013年06月29日 02点06分 1

level 3

freepig3 楼主

2013年06月29日 02点06分 2

level 10

Function 计算(a As Range)
计算 = Application.Evaluate(a.Value)
End Function
然后在单元格输入=计算(A1)就能把A1计算出来。

2013年06月29日 02点06分 3

freepig3

上面的三行代码是VBA代码吗

2013年06月29日 03点06分

吧务

level 12

括号里引用的单元格不要用绝对引用
=EVALUATE(Sheet1!A1),或=EVALUATE(A1)
不是=EVALUATE($A$1)

2013年06月29日 03点06分 4