求编一个自定义函数

jt1132

求高手指教，怎么编一个自定义函数，来对表中公式字段引用，更改表中的公式，查询中：【计算结果】自动重新按新公式计算，我试了一下用EVAL函数，但是没成功，听别人说这个要编一个自定义函数才行，我没有写
过，请教高手，这个怎么写，或者给一个范例
A       B       C        D        E        F            公式                计算结果
100    30      60      90      120      45        A+B+C            EVAL([公式])
详见附件，谢谢

jt1132

计算结果: Eval(Replace(Replace(Replace([公式],"A",[A]),"B",[B]),"C",[C]))