宏太慢

Question

我是编程新手。而且我不确定为什么宏运行得太慢（Excel文件没有响应）。

full code

已尝试简化此操作

Worksheets("Sheet2").Select
        Range("S1", Range("S1").End(xlDown)).Copy
        Worksheets("Sheet1").Select
        Range("K10").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,SkipBlanks:=False, Transpose:=False

对此

Worksheets("Sheet2").Range("S1", Range("S1").End(xlDown)).Copy
Worksheets("Sheet1").Range("K10").PasteSpecial

，但未粘贴值。我不知道我做错了什么。

Answer 1

您的代码可能很慢，因为您的范围很大（最大为50000），并且必须循环遍历，这需要大量时间。尝试使用动态范围或避免使用循环功能来重写您的代码。