Sub Macro1()
'-----------------------
Range("J2:P7").Select
Selection.Copy
Range("A2").Select
ActiveSheet.Paste
'-----------------------
Range("J8:P16").Select
Selection.Copy
Range("A13").Select
ActiveSheet.Paste
'-----------------------
Range("J17:P22").Select
Selection.Copy
Range("A24").Select
ActiveSheet.Paste
'-----------------------
Range("J24:P31").Select
Selection.Copy
Range("A35").Select
ActiveSheet.Paste
End Sub
選我正解
去圖書館找本書,
就可以解決你的問題,
還可以學到很多其他的東西,
如果你之後會常用到Excel VBA的話.