hi,
what is the pupose of having the following two lines at the beginning
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

and the following two lines at the end of the Codes for VB?

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
thanx