Kenの我楽多館blog館

基本：Sheets("シート名").参照プロパティ

ワークシート間での値のコピーは、以下のようになる。

例１：セル1個の値をコピー

Sheets("シートＡ").Range("A1") = Sheets("シートB").Range("A1")
Sheets("シートＡ").Cells(1, i +1) = Range("A1") 

例２：複数セルの値をコピー

Sheets("シートＡ").Range("A1:A2").Value = Sheets("シートB").Range("A1:A2").Value

例３：変数で位置を変えた複数セルの値をコピー

Sheets("シートＡ").Range("A1:A2").Value = Sheets("シートB").Range(Sheets("シートB").Cells(1, i +1), Sheets("シートB").Cells(2, i +1)).Value

備考：

１）Range（セル1個）の場合、.Valueは省略可能だが、複数セルの場合は、.Valueを省略できない

２）コピー元と貼り付け先は、同じ大きさのセル範囲でなければならない

３）エラーになる例：Cellsが参照エラーになるため

誤：Sheets("シートＡ").Range("A1:A2").Value = Sheets("シートB").Range(Cells(1, 1), Cells(2, 1)).Value

正：Sheets("シートＡ").Range("A1:A2").Value = Sheets("シートB").Range(Sheets("シートB").Cells(1, 1), Sheets("シートB").Cells(2, 1)).Value