macros没有响应的macros

我有一个连续循环运行的macros。 电脑有时会冻结,但在Excel代码中没有错误。 该代码使用以下为了有效地运行:

DoEvents Application.DisplayAlerts = False Application.ScreenUpdating = False Application.Calculation = xlCalculationManual startagain: 'code 'calculations, alerts, and screen are updated GoTo startagain 

我也正在使用我认为是一种有效的复制和粘贴方法(大部分代码是粘贴值和公式):

 Length = Range("C1").Value Set rng = Sheets("Linked Data").Range("A2:AA" & Length) Range("A2").Value = rng.Value 

我已经把计算机上的处理器优先级改为EXCEL.exe的“高”,我将计算机性能设置为最高性能,我禁用了所有不必要的加载项,并closures了自动恢复保存。

尽pipe如此,计算机有时会冻结,变得无法响应。 有没有人知道可以做什么来提高可靠性?

避免转到并使用Application.OnTime方法重复运行一个过程。

你也可以考虑创build一个自动化插件,这可能会导致性能imporvement作为它的编译代码。

请参考这个链接

你也可以参考这个链接的performanceimporvement 链接