同一excel中不同表中数据拷贝（普通拷贝）

同一Excel中不同表中数据拷贝（普通拷贝）

Sub 拷贝数据()
Sheet2.Cells(1, 1) = Sheet1.Cells(1, 1)'直接使用即可
Sheets("测试").Cells(1, 1) = Sheet1.Cells(2, 1)'对于非默认的名称，要用sheets加引号引用
Sheets("测试2").Cells(1, 1) = Int(Sheet1.Cells(2, 1).Value + 23)'对于进行运算，要注意数据格式的转换
End Sub