エクセルで数字の置き換えを簡単にできませんか。

質問

エクセルについて、ご教示ください。
シート1にA1からC3までの9マスに数字が入っています。
シート2にも同じようにA1からC3まで（シート1とは異なる）数字が入っています。
シート3にはシート１及び2と同じセルに枠だけ設けています。
そこでご質問です。
シート3のセルに、ボタン一つで、シート1の数字をもってきたり、シート2の数字をもってきたりしたい
のですが、どのようにすればよろしいでしょうか。

ボタンAを押せばシート1を、ボタンBを押せばシート2の数字をもってくるような
イメージです。

また、これら３つのシートのセルの番地は揃っている状態です。

質問文で、意図が上手く伝わらない箇所や、おかしい箇所がおれば、
ご指摘くださいませ。

どうぞよろしくお願い致します。

回答No.2

某HN クロメート(Chromate)（@CoalTar）

フォームのオプションボタンを使い、VBAを使わない方法で
Sheet3!A1セル
=CHOOSE($F$1,Sheet1!A1,Sheet2!A1,"")
右へ下へオートフィル

F1セルに
フォームのオプションボタンを3つ配置し、
[Ctrl]+[1]コントロールの書式設定で
リンクするセル F1

(グループボックスで囲むと、その中のオプションボタンボタンがグループとみなされます。)

回答No.1

keithin

ALT+F11でVBE画面を開き，標準モジュールを挿入して次のような２つのマクロを記載します

sub macro1()
worksheets("Sheet1").range("A1:C3").copy destination:=worksheets("Sheet3").range("A1")
end sub

sub macro2()
worksheets("Sheet2").range("A1:C3").copy destination:=worksheets("Sheet3").range("A1")
end sub

オートシェイプの図形などでボタンの絵柄を２つ作成してワークシート上の希望の場所に配置し，それぞれ右クリックしてマクロを登録します。