带刷新的Visual Basic For循环

Question

我正在尝试使用涉及randbetween的公式在Excel中创建monte carlo宏。见例子

Const Sim_Number As Long = 100
Dim outcomes(Sim_Number)

For counter_simple = 1 To Sim_Number
    outcomes(counter_simple) = ActiveSheet.Range("A1")
    Application.SendKeys ("{F9}") 'refresh
Next counter_simple

在for循环之后，宏计算平均值，标准偏差等。我遇到的问题是，似乎刷新一下子发生，宏本身只使用上次刷新所有100个实例的值。所以平均值，最小值，最大值等都是相同的值。

我编写了另一个宏，它与宏中的函数之间的rand一起工作，以确定问题是for循环。在宏内刷新有什么问题？是否有非sendkeys方法刷新值之间的兰特？感谢。