After setting Application.ScreenUpdating = True before sheet.activate also do the following if multiple windows opened in the same workbook, close other windows , save the workbook , close and re open , and run the macro again