Excel VBA百分數使用具有多個條件的應用程序功能

Question

我有以下公式可以在Excel 2007中的大量數據上正常工作。

在所有情況下，Range1，Range2和ArrayRange都是相同的開始行和結束行。

工作：

 =PERCENTILE(IF(((Range1=Value)*(Range2=Value2)),ArrayRange),0.9)

當我在宏中更新公式時，似乎無法找出使用VBA公式的正確方法。

誰能協助以下工作？

不起作用：

90thPercentile = Application.Percentile(((Range1 = Value) * (Range2 = Value2), ArrayRange), 0.9)
90thPercentile = Application.Percentile(If(Range1 = Value,IF(Range2 = Value2, ArrayRange))), 0.9)

非常感謝Nik

Answer 1

您不能在VBA中使用類似的數組。 您必須使用Evaluate並傳遞公式字符串：

90thPercentile = activesheet.evaluate("PERCENTILE(IF(((Range1=Value)*(Range2=Value2)),ArrayRange),0.9)"