Application.ScreenUpdating = FalseActiveWorkbook.PrecisionAsDisplayed = FalseApplication.DisplayAlerts = False