在不需要自动重算的文件中增加启动宏:
Private Sub Workbook_Open()
With Application
.Calculation = xlManual
.CalculateBeforeSave = False
End With
End Sub