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 vote221 views1 answer
Excel vba concatenate range
VBA
3 votes316 views1 answer
Excel vba make long from two shorts
VBA
8 votes258 views1 answer
Run command pormpt in background windows
VBA
1 vote239 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote285 views1 answer
Excel vba protect content
VBA
0 vote245 views1 answer
Vbnet line chart showing extra space
VBA
0 vote229 views1 answer
How to use if condition in time vba
VBA
1 vote280 views1 answer
Find and replace textbox
VBA
0 vote242 views1 answer
(SecurityProtocolType)3072 vb.net
VBA
0 vote251 views1 answer
Vba table header name
VBA