Speed up macro execution time – restoring

This is the procedure l have used for many years to reverse the speed up macro execution time procedure.
This can be edited to suit your requirement by simply changing the boolean values.
How to use; Call Turnoff
Author: michael@excelexperts.co.uk

Sub TurnOn()

	On Error Resume Next
	With Application
		.Calculation = xlCalculationAutomatic 'calcmode
		.ScreenUpdating = True
		.EnableEvents = True
		.AutoRecover.Enabled = True
		.CutCopyMode = False
		.DisplayAlerts = True
		.StatusBar = False
	End With
	On Error GoTo 0
'
End Sub