
セル A2 の値をコピーして、セル A1 で指定したセルに貼り付けるにはどうすればよいでしょうか。たとえば、A1 には F3 が含まれています。A2 には 2 が含まれています。セル F3 に「2」を書き込みたいとします。
答え1
これは以下のコードで実現できます。
Sheet1.Range(Sheet1.Range("A1").Value).Value = Sheet1.Range("A2").Value
説明
Sheet1.Range("A1").Value
は 内のテキストを取得しますA1
。したがって、Sheet1.Range(Sheet1.Range("A1").Value).Value
内で参照されているセル内のテキストを取得しますA1
。Sheet1.Range("A2").Value
テキストを取得しますA2
。- は設定可能なので
.Value
、参照セルの値を のテキストに設定しますA2
。