宏：打开 Excel 工作簿时激活“自动计算”

Question

如何在使用宏打开Excel工作簿后立即激活“自动计算”选项？

Answer 1

打开 VB 编辑器 ( ALT+ F11) 并右键单击ThisWorkbook（在 Microsoft Excel 对象下）--> 查看代码。

该区域处理工作簿事件代码。

粘贴以下代码：

Private Sub Workbook_Open()
        Application.Calculation = xlCalculationAutomatic
End Sub

这只是更改 Excel 设置以使计算自动进行。如果您想实际计算打开的工作簿，您也可以这样做：

Private Sub Workbook_Open()
        Application.Calculation = xlCalculationAutomatic 'Change calculation setting to automatic
        Application.Calculate 'Perform workbook calculations
End Sub