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

Similar codes

0 vote345 views1 answer
Vba sheet hide unhide
VBA
0 vote334 views1 answer
Do while not vb.net
VBA
6 votes376 views1 answer
Excel vba get the path of current workbook
VBA
0 vote342 views1 answer
VB Error Code BC30201
VBA
0 vote355 views1 answer
Excel vba first working day month
VBA
0 vote311 views1 answer
Excel vba formatconditions range
VBA
2 votes318 views1 answer
Vba array contains
VBA
0 vote331 views1 answer
Compare dates vb
VBA
0 vote345 views1 answer
VBA Loop to range
VBA
0 vote372 views1 answer
Move bindingnavigator vb
VBA