セル範囲をコピーし指定場所に貼り付けする方法について説明します。コピーするにはCopyメソッドを使用します。以下の説明では、セル範囲を一括でコピー&貼り付けする方法について紹介します。
【目次】
構文
記述方法は、以下の通りとなります。
=======================================================================
Range(”[コピー範囲]”).Copy Destination: =[貼り付け先]
=======================================================================
[説明]:
セル範囲をコピー&貼り付けするには「Range(”[コピー範囲]”).Copy Destination: =[貼り付け先]」と記述します。[コピー範囲]にはコピーするセル範囲を記述します。[コピー範囲]は「”」(ダブルクォーテーション)で囲みます。また、コピーした範囲を貼り付けるには、Destination:=の後の[貼り付け先]に貼り付け先セルを指定します。内容を纏めると、「[コピー範囲]でコピーしたデータを、[貼り付け先]で指定したセルに貼り付けて下さい。」との意味になります。
[記述例]:
Range("A1:C3").Copy Destination:=Range("E5")
Range("A1:C3").Copy Destination:=Sheets("Sheet2").Range("E5")
使い方
使い方について、具体的に説明していきます。
同じシート内にセル範囲をコピーする方法
同じシート内にセル範囲をコピー方法について説明します。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
Range("A1:C3").Copy Destination:=Range("E5")
MsgBox "コピーしました。"
End Sub
-------------------------------------------------
内容は、「A1セル~C3セルの範囲をコピーして同シート内のE5セルを先頭に貼り付けし、最後にMsgBoxで”コピーしました。”のメッセージを表示して下さい。」との意味になります。
[実行例]:
(実行前)
※データが入力されているA1セル~C3セルの範囲をコピーします。
(実行後)
※上記でコピーした範囲を同シート内のE5セルを先頭に貼り付けした後、”コピーしました。”のメッセージが表示されます。(赤枠がシート名となります)
同じシート内にセル範囲をコピーする方法についての説明は以上です。
別シートにセル範囲をコピーする方法
別シートにセル範囲をコピー方法について説明します。
[記述例]:
※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
Range("A1:C3").Copy Destination:=Sheets("Sheet2").Range("E5")
MsgBox "コピーしました。"
End Sub
-------------------------------------------------
内容は、「A1セル~C3セルの範囲をコピーしてSheet2シートのE5セルを先頭に貼り付けし、最後にMsgBoxで”コピーしました。”のメッセージを表示して下さい。」との意味になります。
[実行例]:
(実行前)
※データが入力されているA1セル~C3セルの範囲をコピーします。
(実行後)
※上記でコピーした範囲をSheet2シートのE5セルを先頭に貼り付けした後、”コピーしました。”のメッセージが表示されます。(赤枠がシート名となります)
別シートにセル範囲をコピーする方法についての説明は以上です。
おわりに
今回はセル範囲をコピーする方法について説明しました。類似内容にセル範囲を切り取り&貼り付けする方法があります。是非一緒に覚えておいて下さい。