vba - 尽管计算设置为手动，但在打开工作簿时不会禁用计算

Question

亲爱的社区成员，

我们通过以下宏禁用了工作簿中的计算：

Private Sub Workbook_Open()

ActiveSheet.EnableCalculation = False

If Application.Calculation <> xlCalculationManual Then
Application.Calculation = xlManual

Else
End If
End Sub

---

但是当工作簿打开时，它会计算公式并需要一些时间才能打开。理想情况下，我希望在没有任何初始计算的情况下打开工作簿。我尝试了下面的代码，但没有给出令人满意的结果。

有没有一种理想的方法来禁用所有计算？

Private Sub Workbook_Open()


ActiveSheet.EnableCalculation = False

Application.EnableEvents = False
Application.EnableEvents = True

If Application.Calculation <> xlCalculationManual Then
Application.Calculation = xlManual

Else
End If
End Sub

---

非常感谢您对此的帮助。

标签： vbaexcel