VBA～セルを移動しよう～Excel

VBAでセルを移動したい場合はRange.Cutメソッドで移動できます。書き方はRange("移動したいセル").Cut Range("移動先のセル")になります。

単一セルの移動

下のコードを実行するとセルA1がセルC1に移動します。

Sub test1()

Range("A1").Cut Range("C1")

End Sub

範囲の移動

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。移動先のセルは移動したい範囲の左上のセル指定します。

下のコードを実行するとセルA1からセルC3の範囲がセルE1からセルG3に移動します。

Sub test2()

Range("A1:C3").Cut Range("E1")

End Sub

指定したシートのセルを移動

シートを指定するときはWorksheets("シート名")で指定できます。

下のコードを実行するとSheet2のセルA1がセルC1に移動します。

Sub test3()

Worksheets("Sheet2").Range("A1").Cut Range("C1")

End Sub

ブックを指定してセルを消去

ブックを指定するときはWorkbooks("ブック名")で指定できます。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1のセルA1がセルC1に移動します。

Sub test4()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Cut Range("C1")

End Sub