我有一个宏,我已经运行了一段时间,并随着时间的推移对其进行了修改,到目前为止,性能没有任何问题。我没有改变任何东西,但是现在当我遍历它时,会在.Bold之后暂停大约5-10秒。
这是我代码的第一部分
Application.ScreenUpdating = False
Application.EnableEvents = False
Cells.Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
With Selection.Font
.Bold = False
.Italic = False
.Underline = xlUnderlineStyleNone它将在第一次使用Selection.Font命令时卡住-任何一个命令
我试着注释掉.bold,但是.Italic也做了同样的事情
问题是,当我一步一步地执行时,它运行得很快,在第一次尝试更改.bold之后,它等待了大约5-10秒,然后转到下一行。如果我注释掉.bold,那么.Italic会让我等待5-10秒,然后再进入下一行。但是在我运行了一次代码之后,我可以返回并运行相同的代码行,它以正常的快速运行它。
有人知道为什么会发生这种情况吗?
发布于 2016-06-28 06:28:48
这是我的默认打印机,导致了问题。我找到了一个网站来解释比我想要的更多。我将默认打印机更改为默认的"Microsoft XPS documents Writer“,一切工作正常。它适用于excel 2003,但我有2007年的版本,我不确定这是否与从未版本的工作,但希望他们已经解决了这个问题。
链接:BOLD font slows VBA performance in Excel 2003
https://stackoverflow.com/questions/38063722
复制相似问题