チェックボックスに連動した他シートの参照

質問

お世話になります。
以下のようなことを実現したいのですが、具体的にどのようにすれば良いのでしょうか？

シートが２つ
・S1シート
・S2シート

１．S2シートのC1セルにチェックボックスを作成
２．そのチェックボックスにチェックを入れると
　　⇒S2シートのA1のデータがS1シートのA1に表示され、
　　　S2シートのB1のデータがS1シートのB1に表示される。
　　⇒それとともに、S2シートのA1,B1,C1セルに青色がつく。
３．チェックボックスをはずすと、
　　⇒表示されていたS1シートのデータが消える。
　　⇒それとともに、青色も消える。

回答No.5

matsu_jun

> お手数掛けますが、よろしくお願いします。
No.2のmatsu_junです。
Wendy02様を差し置いて拙作を披露させていただきますこと、申し訳ございません。
No1のソースの下の行に、以下を貼り付けてください。

Private Sub Worksheet_Change(ByVal Target As Range)
　　If CheckBox1.Value Then Worksheets("S1").Range("A1:B1").Value = Range("A1:B1").Value
End Sub

蛇足ですが、これはセルの値が変更されるたびに実施される命令と考えてください。