EXCEL的VBA，如果像这样循环复制单元格，动作太慢，要十几秒才能复制完全，有没有更快的命令

Question

我是将
将sheet1的A1复制到sheet2的A1
将sheet1的B1复制到sheet2的B1
将sheet1的B2复制到sheet2的C1
然后做一个循环

Answer 1

有几个办法，一个是不要用COPY，直接用等于
如
SHEET2.[A1]=SHEET1.[A1]
再有就是关闭CHANGE触发(如果没有CHANGE事件的可以不用)
Application.EnableEvents = False
循环完了再
Application.EnableEvents = True
三，关闭屏闪
Application.ScreenUpdating = False
循环完了再
Application.ScreenUpdating = True

Answer 2

Sheet1.Range("A1:B2").Copy Sheet2.Range("A1")
如果没啥规律，那你只能逐段复制了。