关闭自动计算 Application.Calculation = xlManual '

Application.Calculation = xlManual ' 

原文地址:https://www.cnblogs.com/lidapengwww/p/12620413.html