如何在EXCEL中计算公式表达式的结果
作者：mote75
来源：/ygjnfsgasybbguq/item/08a3f21e2cac28e89c778a9e
有很多网友问到如何在EXCEL中计算公式表达式的结果，网络上也有很多关于在名称定义中EVALUATE函数来解决这个问题的方法。网友可以在百度中搜索“EXCEL msn日本EVALUATE”，网上有很多这样的示例。
抗癌中药但如果要计算的式子很多的话，每个都要自定义一下确实不方便，其实使用自定义函数可以较好地解决这个问题，而且函数适用范围较广，使用方便。
励志文字方法如下：按ALT+F11打开VBA代码窗口，在左侧的工程窗口，右击当前工作薄的VBAProject，插入模块
Function myEVal(strExp As String, Optional IsVBS As Boolean = True)
Dim sc
全家便利店利润>做月子可以吃什么
Set sc = CreateObject("MSScriptControl.ScriptControl")
系统测试的目的
If IsVBS Then
早安怎么幽默回复 sc.Language = "VBScript"
El
sc.Language = "JScript"
End If
myEVal = sc.eval(strExp)
Set sc = Nothing
End Function
并在中间的模块代码窗口播入如下代码：然后，这个工作薄中就可以使得这个自定义函数了。
函数的第一个参数是所要计算的表达式。第二个参数缺省或为True时表明要计算的这个表达式是一个VBScript表达式，第二个参数为Fal时表明要计算的表达式是一个JScript表达式，
比如：要计算的公式在A1,那么可以在B1中使用公式 =myEVal(A1) 来计算A1中公式的结果了。
如果是要计算JScript表达式，则可以用公式=myEval(A1,Fal)
有了此自定义函数，不仅可以方便地在EXEL计算一般的数学表达式，还可以轻松的引用VBS或JS中的函数，甚至可以进行JS编程，使用循环语句。下图中是一些应用示例（示例也可以在本文最后的地址中下载）：
示例文件下载： /share/link?shareid=433741&uk=1393865824
