直接用copy方法即可。如sheet1表格复制到sheet2,代码如下:Sheets("Sheet1").Cells.Copy Sheets("Sheet3").Range("A1")
那你拷贝的时候最好带上各式,可以考虑用range.copy 方法。