在VBA函數中運行EXCEL公式

Question

我在VBA中有一個自定義函數，我從單元格調用，我有一個像這樣的公式

"=SUM(SUMIFS(CURR_COUNT;MDL;""MODEL"";CURR_MDLCD;{CODES};RG;""REGIONID""))/SUM(SUMIFS(CURR_COUNT;MDL;""MODEL"";RG;""REGIONID"";CURR_MDLCD;""<>     ""))"

我的自定義函數接受一些單元格值並將它們插入到只是字符串的公式中。 之后我需要計算公式並將結果返回到我稱之為函數的單元格？ 我可以在函數中計算這個公式並將結果返回給單元格嗎？

Answer 1

假設您的公式字符串在實際放入單元格時可以正常工作，那么如果您使用Application.Evaluate它應該有效 - 但是您不包含等號。

例如，計算

=SUM(A1:B1)

在VBA你會用

Application.Evaluate("SUM(A1:B1)")