Sub CopyRange()
ThisWorkbook.Sheets("Sheet1").Range("A1:C7").Copy Destination:=ThisWorkbook.Sheets("Sheet2").Range("B1")
ThisWorkbook.Sheets("Sheet2").Select
End Sub
【VBA】复制Range
最新推荐文章于 2022-04-27 18:35:37 发布
Sub CopyRange()
ThisWorkbook.Sheets("Sheet1").Range("A1:C7").Copy Destination:=ThisWorkbook.Sheets("Sheet2").Range("B1")
ThisWorkbook.Sheets("Sheet2").Select
End Sub