Excel VBA 入門講座セルの範囲のコピー貼り付け

セルの範囲のコピー貼り付け

セルの範囲のコピー貼り付けにはCopyメソッドを使用します。貼り付け先を引数により指定します。

メソッド	引数	定数	内容
Copy	Destination	--	コピー先をRengeオブジェクトで指定


'セルB1～D3の範囲をコピー貼り付け
Sub CopyCell()
    Range(Cells(1,2),Cells(3,4)).Copy Destination:=Cells(5,6)
End Sub

Sub CopyCell()
    Range("B1:D3").Copy Destination:=Range("F5")
End Sub

Sub CopyCell()
	Worksheets("Sheet1").Activate
	Worksheets("Sheet1").Range(Cells(1,2),Cells(3,4)) _
		.Copy Destination:=Worksheets("Sheet1").Cells(5,6) 
End Sub

Sub CopyCell()
	Worksheets("Sheet1").Activate
	Worksheets("Sheet1").Range("B1:D3") _
		.Copy Destination:=Worksheets("Sheet1").Range("F5") 
End Sub