VBA粘贴值 – 响应时间

我有一个代码复制一个范围到另一个

rng1.Copy Destination:=rng2 

不过，我只想要的价值，而不是所有的格式，所以我有下面的工作来实现这一目标

 rng1.Copy Application.ScreenUpdating = False rng2.PasteSpecial Paste:=xlPasteValues Application.ScreenUpdating = True 

但是，这个处理速度是非常缓慢的。 与第一种配方的即时反应相比，片材停止了相当长的一段时间。

是否有修改第一个公式来粘贴值的方法？ 我无法find关于粘贴值的类似问题的方法….

或者，有没有比使用第二个公式更快的方法？

Answer 1

复制和粘贴在VBA中是非​​常慢的，只是直接分配，假设两个范围都是相同的大小

rng2.value = rng1.value