不装不臊

摘要： 在一个帮朋友的Excel VBA项目中为了执行效率.这样先: '修改屏幕更新,计算模式和启用事件的状态With Application CalcMode = .Calculation .Calculation = xlCalculationManual .ScreenUpdating = False .EnableEvents = FalseEnd With然后这里:处理生成了大量的公式………. 这里来了个悲剧的: '选择性粘贴所有单元格 newSheet.Range("A1:J6500" & i).Copy newSheet.Range(" 阅读全文