【Excel_VBA】セル範囲の内容を別のセル範囲に移動する(165)

【Excel VBA】サンプルファイル(.xlsm)《ダウンロード》

  1. RangeオブジェクトCutメソッドを使用すると、特定のセル範囲を別のセル範囲に移動することが出来ます。元のセル範囲を表す移動先のセルは、引数Destinationで指定します。
  2. 移動先に1つのセルを指定した場合、そのセルを左上端とするセル範囲に移動されます。
目次

【Excel VBA】サンプルコード

サンプルコード

Sub vba165()
    Range("B4:C6").Cut Destination:=Range("E4")
End Sub

解説

  1. RangeオブジェクトCutメソッドを使用すると、特定のセル範囲を別のセル範囲に移動することが出来ます。元のセル範囲を表す移動先のセルは、引数Destinationで指定します。
  2. 移動先に1つのセルを指定した場合、そのセルを左上端とするセル範囲に移動されます。
 プラスワン 

Pasteメソッドで貼り付ける

  • 「切り取り」と「貼り付け」を個別に行うには、CutメソッドDestinationを指定せず、「切り取り」だけを実行します。
  • その後、Selectメソッドで移動先のセルを選択し、ActiveSheetプロパティで作業中のワークシートを表すWorksheetオブジェクトを取得して、そのPasteメソッドで「貼り付け」を実行します。

【Excel VBA】実行例

ステップ 1 ・・・・・・・・

ステップ 2 ・・・・・・・・

【Excel VBA】サンプルファイル(.xlsm)《ダウンロード》

Excel_VBA_165.xlsm【ダウンロード】

よかったらシェアしてね!
  • URLをコピーしました!
  • URLをコピーしました!

この記事を書いた人

コメント

コメントする

目次