用COPY方法可以将一个区域复制到另一个地方去，如：

Sheets("sheet1").Range("a1:b12").Copy Sheets("sheet2").Cells(1, 1)
但这样复制时将格式和公式也复制过去了，如何只复制数值呢？

方法1：

Sheets("sheet1").Range("a1:b12").Copy
Sheets("sheet2").Cells(1, 1).PasteSpecial Paste:=xlPasteValues

方法2：

Sheets("交易计划").Range("u1:v5") = Sheets("汇总").Range("B2:C6").Value

range("b1:b10")=range("a1:a10").value

注value不可缺少