Speed up VBA

Increase speed of Macro by 10xThe following VBA can increase the speed of a macro by 9500%.  Greatly reducing the time it takes to run the macro.  Testing the code reduced time from 28.19 seconds to 2.96 seconds almost 10x as fast.

Increase speed of Macro by 9500%

Sub IncreaseSpeed() 
Application.ScreenUpdating = False 
Application.DisplayStatusBar = False 
Application.EnableEvents = False 
Application.Calculation = x1CalculationManual 

'VBA procedure goes here 'Remember to turn settings back to normal at the end 

Application.ScreenUpdating = True 
Application.DisplayStatusBar = True 
Application.EnableEvents = True 
Application.Calculation = x1CalculationAutomatic 
End Sub