エクセルマニア

VBA セルに値をコピー

TOP > VBA・マクロ >  セルに値をコピー
下図のように、A1~A5 のセルの値を B1~B5 にコピーする方法を数種類ご紹介します。

セルに値をコピー

1つずつコピーする場合。
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
ループ処理でコピーする場合は Cells(列,行).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


このエントリーをはてなブックマークに追加