▽1
●
なむうぉんす ●150ポイント ベストアンサー |
下記のマクロで如何でしょう。
Sub Macro1() ' ' Macro1 Macro ' Sheets("シートa").Select Range("A1:B1").Select Selection.Copy Sheets("シートb").Select Range("C1").Select ActiveSheet.Paste Sheets("シートa").Select Range("A2:B2").Select Application.CutCopyMode = False Selection.Copy Sheets("シートb").Select Range("E1").Select ActiveSheet.Paste End Sub
マクロ組む必要ありますかね?wエクセルのセルの右下をひっぱるとコピーできるのですが、こっちのほうが手っ取り早いですよ。