Range.PasteSpecial导致Excel VBA中的应用程序屏幕更新

时间:2019-04-25 13:23:47

标签: excel vba

我写了一个Excel的VBA宏,如下所示:

Application.ScreenUpdating = False

Dim copyingRange, pastingRange As Range
copyingRange.Cells.Copy
pastingRange.PasteSpecial xlPasteValues

Application.ScreenUpdating = True

据我了解,Application.ScreenUpdating = False将强制应用程序停止屏幕更新,但这不是我所看到的行为。我正在将范围从一张纸复制到另一张纸,并且该应用程序非常快地切换视图与视图之间的切换,这是不希望的。

取出pastingRange.PasteSpecial xlPasteValues行会导致屏幕闪烁消失,但显然会导致宏无法执行我想要的操作。

pastingRange.PasteSpecial xlPasteValues是这里的问题吗?我一定在这里误会了什么?

1 个答案:

答案 0 :(得分:1)

来自评论,因此可以列为已回答

您可以避免复制/粘贴,因为您只需要值并编写:

pastingrange.value = copyingrange.value