如何翻译这个公式翻译成VBA？

Question

我在下面有这个公式，我试图根据引用单元格中的数据执行不同的计算。该公式有效，但我需要对找到的数据有更大的灵活性。

=IF(AND(U1="APO 300%",$E2="P+"),P2-(SUMIF($F$2:$F$74,300%,H$2:H$74)*M2)-(SUMIF($F$2:$F$74,150%,H$2:H$74)*M2),IF(AND(U1="APO 300%",$E2="P"),H2,""))

是否有可以复制此代码的代码？

Answer 1

工作表有一个Evaluate方法可用于执行您想要的操作：

shtObject.Evaluate("A1+B1") '<<< substitute in your formula