excel vba automatic calculation
Sub CalculationMode() ' To manual Application.Calculation = xlManual ' One shot Recalculation (one worksheet), keeps Calculation mode to manual ThisWorkbook.Worksheets(1).Calculate ' To automatic Application.Calculation = xlAutomatic End Sub