Make the below code work faster!!!

Originally Posted by Winon

Hello devpp,

With your Application.ScreenUpdating= False, try adding Application.Calculation= xlCalculationManual,and then at the end of your Code, with Application.ScreenUpdating = True, add also Application.Calculation = xlCalculationAutomatic.

Actually I cant add xl calculation as manual as there is some calculations involved when the rows are added in another sheet.so is there any other alternative?