VBA セルに値をコピー
*このページは excel-mania.com のアーカイブです。(2025年 サイト統合)
下図のように、A1～A5 のセルの値を B1～B5 にコピーする方法を数種類ご紹介します。
セルに値をコピー
1つずつコピーする場合。
セル範囲を一括で指定してコピーする場合。
ループ処理でコピーする場合は Cells(列,行).Value を使用すると便利です。
手動でコピー＆ペーストする操作と同様の事も可能です。詳細はこちら。
Range("B1").Value = Range("A1").Value
Range("B2").Value = Range("A2").Value
Range("B3").Value = Range("A3").Value
Range("B4").Value = Range("A4").Value
Range("B5").Value = Range("A5").Value
Range("B1:B5").Value = Range("A1:A5").Value
Dim y As Integer
For y = 1 To 5
Cells(y, 2).Value = Cells(y, 1).Value
Next y
Range("A1:A5").Copy
Range("B1:B5").PasteSpecial