VBA~行をコピーしよう~Excel
VBAで行をコピーしたい時はRange.Copyメソッドでコピーできます。
単一行のコピー
単一行をコピーしたい時はRows(行番号).Copy Rows(貼り付け先の行番号)でコピーできます。
下のコードを実行すると行2が行7にコピーされます。
Sub test1() Rows(2).Copy Rows(7) End Sub
連続行のコピー
連続行をコピーしたい時はRows("開始行の行番号:終了行の行番合").Copy Rows(貼り付け先の一番上の行番号)でコピーできます。
下のコードを実行すると行2から行4が行7から行9にコピーされます。
Sub test2() Rows("2:4").Copy Rows(7) End Sub
非連続行のコピー
非連続行をコピーしたい時はRange("一つ目の行番号:一つ目の行番号,二つ目の行番号:二つ目の行番号").Copy Rows(貼り付け先の一番上の行番号)でコピーできます。カンマで区切ることでさらに複数の行をコピーできます。
下のコードを実行すると行2と行4が行7,行8にコピーされます。
Sub test3() Range("2:2,4:4").Copy Rows(7) End Sub