macros:打开Excel工作簿时激活“自动计算”

如何在用macros打开excel工作簿后直接激活“自动计算”选项?

打开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