excel的VBA不自动计算的解决方案【亲测可行】

Sub RefreshFormulas()
    '范围内的公式更新计算
    Dim rng As Range
    Set rng = Range("A1:A5") '设置要更新的单元格范围1
    rng.Formula = rng.Formula '重新分配现有的公式以触发更新

End Sub

rng.Formula = rng.Formula是一种常见的技巧，用于触发Excel中指定范围内公式的重新计算。

当你将rng.Formula属性设置为相同的rng.Formula时，实际上没有改变公式的内容。然而，通过重新分配相同的公式，你可以强制Excel重新计算范围内的公式，以确保结果是最新的。

这种方法通常用于处理那些在公式的计算结果不更新的情况下需要更新的场景。通过将范围内的公式重新分配给相同的公式，Excel会检测到公式发生了变化，并重新计算范围内的公式，以更新计算结果。

需要注意的是，这种方法只适用于公式本身没有发生变化的情况。如果公式发生了变化，你需要手动更新公式的内容，而不仅仅是重新分配相同的公式。

此外，使用rng.Formula = rng.Formula触发公式重新计算时，Excel会按照自动计算的设置进行计算。如果你的Excel设置为手动计算模式，你需要在重新计算之前将其切换为自动计算，或者在代码中使用Application.Calculate方法来强制进行计算