屏幕闪烁VBA Excel

时间:2015-08-12 15:11:46

标签: excel vba excel-vba

我自己已经阅读了很多内容,但无法找到解决方案。 我有一个大约10,000行的程序,我有一个程序附加到特定的命令按钮。这计算了一些复杂的方程式。

我像往常一样使用Application.ScreenUpdating = False启动代码,并在主程序结束前将其转为True。然而,只有Excel工作表的上半部分(菜单栏附近)保持闪烁大约10秒,直到结果出现。我尝试禁用事件,以及将计算转为手动,但没有任何帮助。甚至尝试在与主程序相关的子程序开始时将屏幕更新提到假。

对此有任何建议将非常感谢。谢谢!

1 个答案:

答案 0 :(得分:0)

尝试在sub的开头添加:

Application.EnableEvents = False
Application.DisplayStatusBar = False
Application.Calculation = xlCalculationManual

这就在结束之前:

Application.EnableEvents = True
Application.DisplayStatusBar = True
Application.Calculation = xlCalculationAutomatic

那应该有所帮助。但请注意,在运行复杂的宏时,我的屏幕有时也会闪烁(Excel看起来没有响应,但它在后台工作)。