Excel表格中如何用VBA代码替代公式

Question

在Excel表格中，许多数据都是通过公式计算得到的，
如A2=IF(BD2<>"",BD2,IF(F2="","",IF(ISERR(IF(((BF2=9.52)*(BG2)=0.28),(BF2-0.019-BG2)*(0.019+BG2)*0.028*F2*G2/1000,(BF2-BG2)*BG2*0.028*F2*G2/1000)),0,IF(((BF2=9.52)*(BG2)=0.28),(BF2-0.019-BG2)*(0.019+BG2)*0.028*F2*G2/1000,(BF2-BG2)*(BG2+0.45*BH2)*0.028*F2*G2/1000))))
这上面只是A2一个单元格的内的公式，因为表格行数很多，如果采用常规的公式复制，最后的表格的体积非常大，，所以我想请教高手如何用VBA代码来替代公式的复制。我想要那种通用的，（可以让我稍微变化一下，就可以替换其它公式）。最好是那种自动运算的。

Answer 1

首先把你的文件发给我吧、

Answer 2

用插入名称，定义 的方式 替换公式。这样可以精简。具体你可以搜索 evaluate 参考。追问

您可以把我上面的公式用名称来替代的过程写给我看看吗

追答

BaiduHi联系！

本回答被提问者采纳

Answer 3

首先把你的文件发给我吧、

Answer 4

你这个0悬赏的问题还真麻烦唉。给你指条明路吧，用自定义函数可以替换掉你的那堆公式。然后在A2及以下单元格输入自定义函数就行了。