[求助]：能否编这样一个自定义函数？

glgandhi

在A列中输计算式，如：67×98÷98＋35－90，在B列中输入公式jisuan(A1)就可计算出结果呢？求各位高手出手相助，小弟先谢过了！
在次之前我看到有《神奇公式》的帖子，但是不能灵活用运，希望能有个自定义函数来解决！

yi.gao

怎么算灵活运用？

glgandhi

在《神奇公式》中，只能在固定的列中输入公式，在固定的列中计算结果，如果有自定义的函数的话会更方便吧；还有，就是我们的计算式中应该用×、÷而不是*、\，所以我觉得有这样的函数应该对大家很方便！谢谢各位高手了！

yi.gao

这则帖子仅供参考。*与/在excel中可以通用，想实现数学符号的乘除有相当难度。


[iframe h=600 w=100%]http://www.xdcad.net/forum/showthread.php?s=&threadid=287926&perpage=15&display=&pagenumber=1[/iframe]

glgandhi

刚才研究了一下，因为对VBA所知甚少，用了个笨办法，在EXCEL中用SUBTITUDE函数对计算式中的×和÷举行两次替换，然后在VBA中将《神奇公式》中的改为
Private Sub Worksheet_Change(ByVal Target As Range)
Cells(Target.Row, 5) = "=" + Cells(Target.Row, 7)
End Sub
请问yi.gao  能否有改进的余地？我带了个附件，顺便帮我看看，清单中的“工程数量”可否由“计算式”中的数据自动填入？“分项工程名称”这个倒是解决了，但工程数量这个不懂怎么办了？先谢谢yi.gao  大侠！！！