'セルB1~D3の範囲を切り取り貼り付け
Sub CutCell()
    Range(Cells(1, 2), Cells(3, 4)).Cut Destination:=Cells(5, 6)
End Sub

Range("B1:D3")の範囲をカットして、Range("F5:H7")に貼り付けました。

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です