優しい人達がレスしてくれるスレッド Ver.31

ぐはまた間違えました
正しくは以下のSheet1の部分です
　　Range("A1").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("C1").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet2").Select
Range("C1").Select
ActiveSheet.Paste
Range("A1").Select