Sub Macro3()
'
' Macro3 Macro
'
Worksheets("Sheet1").Select
Range("A2:E2").Select
Selection.Copy
Worksheets("Sheet2").Select
Range("D11").Select
ActiveSheet.Paste
'
' Macro3 Macro
'
Worksheets("Sheet1").Select
Range("A2:E2").Select
Selection.Copy
Worksheets("Sheet2").Select
Range("D11").Select
ActiveSheet.Paste
End Sub
逻辑:选择源页签-》选择要拷贝的源单元格-》选择目的页签-》选择目的单元格-》黏贴