[[20120513152449]]　『シート上に入力したセル番地にあるセルの値をコピ』（ミシェル）　ページの最後に飛ぶ

『シート上に入力したセル番地にあるセルの値をコピーするVBE記述方法』（ミシェル）

例えば、sheet1のB2に入力した値をsheet2のC3にコピーするのは、
Sheets(2).Range("C3")=Sheets(1).Range("B2")で可能ですが、

では、Sheet1のB2のセルにA1と入力すれば、sheet2のC3にsheet1のA1の値が
コピーできるよう方法はないでしょうか。
当然ですが、上記記述のままでは、sheet2のC3に「A1」とコピーされます。
そうではなく、A1に入力した値をコピーする記述が思いつかず悩んでいます。

この記述を実現したい理由は、マクロを組んだファイルを今後引き継いでいく
にあたって、コピーしたいコピー元のセルやコピー先のセルが動いた場合に、
VBEまで修正せず、コピー元や先のセル番地をシート上で入力すればするだけ
で済むようにしたいからです。

Excel2003

 Sheets("Sheet2").Range("C3") = Sheets("Sheet1").Range(Sheets("Sheet1").Range("B2"))
 でどうでしょうか？

 (se_9)

se_9さん、ありがとうございました。
思いどおりのコピーが実行できました。

組織として引き継ぐうえで欠かせない工夫が実現できそうです。
すばやくスマートなお答えをいただき、心から感謝いたします。

（ミシェル）

コメント返信：