如何解决在EXCEl中函数evaluate的计算式长度的问题

发布网友 发布时间：2022-04-23 00:52

我来回答

共5个回答

热心网友 时间：2023-07-15 18:50

可以把计算式在适当的位置 分成2段 比如说 1+2+1+1
分别将 1+2 输入 A1 1+1输入 B1
引用位置输入 EVALUATE（Sheet1!A1&"+"&SHEET1!B1)

热心网友 时间：2023-07-15 18:50

可以分开命名如
想要计算1+3*5/6+6+7*10*14*42（只是假如）
那就命名
计算1=1+3*5/6+6
计算2=7*10*14*42
计算3=计算1+计算2
这样就可以 了 ，大概思路就是这样

热心网友 时间：2023-07-15 18:51

Dim Expression '该变量用于附给计算公式或数值
If Len(Expression) <= 254 Then '计算不超过254字符的字符串计算式
Expression = Evaluate("=" & Expression)
Else '计算超过254字符的字符串计算式
With CreateObject("MSScriptControl.ScriptControl")
.Language = "vbscript"
Expression = .Eval(Expression)
End With
End If

热心网友 时间：2023-07-15 18:51

输入以后，同时按住crtl、shit、enter追问输入什么以后

热心网友 时间：2023-07-15 18:52

如果公式规则基本一致,可以将一个单元格的公式折分到两个单元格中去(但保证切点一致)
通过两个单元格去计算就可以了.追问具体做法。。。还有能否像网上说的在宏里面自定义一个可以达到要求的函数。。。

追答要看你的表格.加510809100,看了你的数据后或许能找到一些思路