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

1 vote143 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote136 views1 answer
Excel vba join variant array
VBA
0 vote150 views1 answer
Vba vbcrlf chr
VBA
0 vote137 views1 answer
Vba remove numbers from string
VBA
0 vote126 views1 answer
Vba argument is set
VBA
0 vote136 views1 answer
Vbnet dynamically change excel sheet name
VBA
0 vote144 views1 answer
Rotate image by any angle vb.net
VBA
0 vote135 views1 answer
Type excel.application is not defined vb
VBA
0 vote147 views1 answer
Filesystemobject vba reference
VBA
0 vote135 views1 answer
Excel vba concatenate range
VBA