Speed up macro execution time

This is the procedure l have used for many years to speed up macro execution time.
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 TurnOff()

	On Error Resume Next
	With Application
		.Calculation = xlCalculationManual
		.ScreenUpdating = False
		.EnableEvents = False
		.CutCopyMode = False
		.DisplayAlerts = False
		.AutoRecover.Enabled = False
	End With
	On Error GoTo 0

End Sub