エクセルにて、チェックボックスの表示・非表示

エクセルにて、コントロールツールのチェックボックスの表示・非表示をセルの入力・未入力で切り替えたいのですが、VBAはどう組んだらしたらよいでしょうか？exel2003です。よろしくお願いいたします。

No.1 ベストアンサー 回答者： kybo 回答日時： 2012/08/08 13:12

セルを変更したタイミングでしたいなら、Changeイベントです。

A1の例ですが、以下の様にしてみて下さい。

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
ActiveSheet.CheckBox1.Visible = IIf(Range("A1").Value, True, False)
End Sub

ボタン等押しておこなうのであれば、上記の2行目を実行します

この回答へのお礼

迅速な対応ありがとうございます。
Private Sub CheckBox1_Click()でVBAを作っていたのでできなかったようです。
これだとチェックボックスをクリックしたのときにしか反応しないということですね！

勉強になりました。
ありがとうございます。m(>_<)m

お礼日時：2012/08/08 14:34